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Preface 



This manual provides the programming information required 
to use the Multiline/Multipoint Feature (MLMP) with 
System/3 Model 10, Model 12, or Model 15 binary synchro- 
nous communications programs. 

On the Model 1 and Model 1 2, M LMP is a feature of the 
System Control Programming (5702-SC1, Features 6030 
and 6031). On the Model 15, MLMP is included in the base 
System Control Programming (5704-SC1 or 5704-SC2). 

Hereafter, the terms "MLMP" and "System/3" should be 
understood as applying to the System/3 Model 10 Disk Sys- 
tem, the Model 12, and the Model 15, unless qualified by 
"Model 10 and Model 12 only" or "Model 15 only." 

This reference manual is intended for applications program- 
mers who are familiar with: 

• Basic telecommunications concepts and practices 

• IBM System/3 Basic Assembler language 

• IBM System/3 Model 10 Disk System, Model 12, or 
Model 15 

The manual describes MLMP and the functions of MLMP, 
the System/3 MLMP macro instructions, and the MLMP diag- 
nostics and diagnostic aids. The book also lists MLMP sys- 
tem requirements and considerations. Appendixes contain a 
list of MLMP considerations unique to certain terminals, ex- 
amples of coded MLMP macro instructions and a sample pro- 
gram, data area formats, BSC line control characters and 
codes, and a macro instruction summary. 

As noted in the text, many of the cross references in this 
manual address index entries. 



SYSTEM/3 MODEL 8 

The System/3 Model 8 is supported by System/3 Model 10 
Disk System control programming and program products. 
The facilities described in this publication for the Model 10 
are also applicable to the Model 8, although the Model 8 is 
not referenced. However, the Integrated Communications 
Adapter (ICA) is only available on the Model 8. If you 
have either the ICA or local display adapter, it is always 
designated as BSC A line 2. Therefore, you must specify 
line 2 whenever the ICA or local display adapter is used, or 
enter the BSCA OCL statement (// BSCA LINE-2) at 
execution time. It should be noted that not all devices 
and features which are available on the Model 10 are avail- 
able on the Model 8. Therefore, Model 8 users should be 
familiar with the contents of IBM System/3 Model 8 
Introduction, GC21-5114. 



Prerequisite Publications 

• General Information: Binary Synchronous Communica- 
tions, GA27-3004 

• IBM System/3 Models 8, 10, 12, and 15 Components 
Reference Manual, GA2 1-9236 
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Related Publications 

• IBM System/3 Basic Assembler Reference Manual, 
SC21 7509 

• IBM System/3 Models 4, 6, 8, 10, and 12 System Genera- 
tion Reference Manual, GC21 -51 26 or IBM System/3 
Model 15 System Generation Reference Manual, 
GC21-7616 

• IBM System/3 Model 8 Operator's Guide, GC21 -7634, 
IBM System/3 Model 10 Disk System Operator's Guide, 
GC2 1-7508 or IBM System/3 Model 15 Operator's 
Guide, GC21-5075 

• IBM System/3 Model 10 Disk System Control Program- 
ming Reference Manual, GC21 -751 2; IBM System/3 
Model 15 System Control Programming Reference 
Manual (5704-SC1), GC21-5077, or IBM System/3 Model 
15 System Control Programming Concepts and Reference 
Manual, (5704-SC2), GC21-5162 

• IBM System/3 Model 10 Disk System Halt Guide, 
GC21 -7540 or IBM System/3 Model 15 System 
Messages, GC21-5076 

• IBM System/3 Disk System Control Programming Macros 
Reference Manual, GC21 -7562 or IBM System/3 Model 
15 System Control Programming Macros Programming 
Reference Manual, GC2 1-7608 



• IBM System/7 Binary Synchronous Communications 
Module (RPGj, Programming Guide and Reference 
Manual, SC34-1510 

• IBM System/7 Teleprocessing Multiplexor "TPMM" 
Programming Guide and Reference Manual Supporting 
RPQD08011, SC34-1506 

• System Components: IBM 2770 Data Communication 
System, GA27-3013 

• IBM 2780 Data Transmission Terminal: Component 
Description, GA27-3005 

• Component Description: IBM 2972 Models 8 and 1 1 
General Banking Terminal System, GL27-3020 

• IBM 3270 Information Display System Component 
Description, GA27-2749 

• IBM 3735 Programmer's Guide, GC30-3001 

• IBM Systems 3735 Support Program Coding Manual, 
GC21-5096 

• IBM 3600 Finance Communication System Program- 
mer's Guide and Component Description, GC27-0004 



• IBM System /3 Overlay Linkage Editor Reference 
Manual, GC21-7561 

• IBM System/3 Multiple Line Terminal Adapter RPQ 
Program Reference and Component Description 
Manual, GC2 1-7560 

• IBM System/3 Model 12 System Control Programming 
Reference Manual, GC21-5130 

• IBM System/3 Model 12 Operator's Guide, GC21-5144 

• IBM System/3 Model 12 User's Guide, GC21-5142 

• IBM System, 3 Models 8, 10, 12, and 15 Components 
Reference Manual, GA2 1-9236 



IBM System /3 Model 12 Halt Guide, GC21-5145 
IBM System/7 Systems Summary, GA34-0002 



Page of GC21-7573-4 
Issued 25 November 1977 
By TNL: GN21-5587 

Contents 



CHAPTER 1. MULTILINE/MULTIPOINT BINARY 
SYNCHRONOUS COMMUNICATIONS . . . 

Telecommunications Lines Supported 

Functions 

Multiple Line Terminal Adapter 

CHAPTER 2. SYSTEM/3 MACRO INSTRUCTIONS 

Description 

Conventions , 

CHAPTER 3. MLMP PROGRAMMING .... 

Preparing for Data Transfer . ., 

Generate Common Equates ($COMN) 
Generate BSC DTF Displacements and Labels 

(SDTOB) 

Define the File for BSC (SDTFB) 

Allocate BSC Files (SALOC) 

Open BSC Files (SOPEN) 

Generate a Model 10 and Model 12 Checklist 

($CKL) 

Generate a Model 15 Checklist ISCKL) . 
Generate a Polling/Addressing List ($POLB) 

Change a Polling List (SBCPL) 

Generate a Parameter List for Changing a Polling 

List or a Switched ID List (SCHGB) 
Allocate the Terminal Statistics Logging Area 

(SLOGB) 

Generate a Switched ID List (SSWIB) 
Change a Switched ID List ($BCSW) .... 
Generate a Translate Parameter List (STRL) 
Generate a Translate Table ($TRTB) .... 
Generate an Interface to the Translate Routine 

(STRAIM) 

Generate an Online Test Parameter List (SRFTL) 

Initiating Data Transfer 

Move Mode 

Issue a GET Request ($GETB) 

Issue a PUT Request ($PUTB) 

Cancel a GET Request (SCANB) 

Check for I/O Completion ($CHK) .... 
Techniques for Initiating Data Transfer . 

Terminating Data Transfer 

Terminate BSC Files 

Close BSC Files (SCLOS) 

CHAPTER 4. DIAGNOSTICS AND DIAGNOSTIC 

AIDS 

Mnotes 

Halts 

Completion Codes 

BSC Counters 

Initializing MLTERFIL 

Online Test 

Trace 

Snap Dump Main Storage ($SNAP) .... 



9 

9 
10 

10 
10 
16 
18 

17 
18 
19 
20 

21 

21 
22 
23 
24 
24 

25 
26 
27 
27 
27 
28 
29 
29 
31 
39 
39 
39 



41 

41 
45 
45 
50 
50 
51 
54 
55 



CHAPTER 5. REQUIREMENTS AND 

CONSIDERATIONS 57 

System Configuration 57 

Model 8 57 

Model 10 57 

Model 12 58 

Model 15 58 

Storage Requirements 59 

Programming Requirements 59 

MLMP Programming Considerations 59 

APPENDIX A. DEVICE-DEPENDENT 

CONSIDERATIONS 61 

IBM 2972 Banking Terminal System 61 

IBM 3270 Information Display System 61 

Polling/Addressing a 3270 61 

Reading From and Writing To a Remote 3270 ... 62 

How to Request an Online Test from a 3270 ... 71 

Status/Sense Messages 71 

Polling/Addressing a 3270 via the Display Adapter . 76 

IBM 3735 Programmable Terminal 77 

Form Descriptor Convert Routine ($$BSCN) ... 77 

Additional 3735 Considerations 78 

APPENDIX B. SAMPLES 79 

Sample MLMP Macro Instructions 79 

Model 10 and Model 12 Sample Program: 

Communicating with the 3270 87 

APPENDIX C. DATA AREAS, PARAMETER LISTS, 

AND MESSAGE FORMATS 105 

BSC DTF 105 

MLMP I/O Area 109 

Terminal Statistics Logging Area 109 

Trace Table 110 

BSC I/O Registers 111 

Checklist 111 

Polling/Addressing List 112 

Switched ID List 112 

Parameter List for Changing a Polling List or 

Switched ID List 112 

Translate Parameter List 113 

Online Test Parameter List 113 

Online Test Requests 114 

MLMP Message Formats 115 

APPENDIX D. CONTROL CHARACTERS AND 

CODES 117 

EBCDIC 117 

ASCII 118 

Hexadecimal Representations 119 

Tributary System/3 Polling and Addressing 

Characters 119 

APPENDIX E. MACRO INSTRUCTION SUMMARY . . 121 

INDEX 123 



Contents iii 



Chapter 1. Multiline/Multipoint Binary Synchronous Communications 



Multiline/Multipoint (MLMP) is a binary synchronous 
communications (BSC) feature of System/3. MLMP pro- 
vides the assembler programmer access to the BSC I/O 
routines that support the Binary Synchronous Communica- 
tions Adapter (BSCA) as an I/O device. For a description 
of the BSCA, see the appropriate components reference 
manual for your system listed in the Preface. 



MLMP enables the assembler programmer to transmit and 
receive binary synchronous data over two telecommunica- 
tions lines simultaneously (each line requires a BSCA). 
The two lines can be used in the same program or can be 
used independently in separate program levels (on Model 10 
or Model 12 that has the dual programming feature in- 
| stalled) or in the program partitions (on Model 15). The 
lines can be nonswitched or switched. Figure 1 gives exam- 
ples of the line configurations possible with MLMP. 
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Figure 1 (Part 1 of 2). Examples of MLMP BSC Networks 
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'The Integrated Communications Adapter (ICA) must be addressed as BSCA 
line 2. The manual ICA switch can have only one interface active at any 
one time. 

2 See Figure 1 (Part 1 of 2) for examples of BSCA line configurations. 

Figure 1 (Part 2 of 2). Examples of MLMP BSC Networks 



The MLMP user specifies the functions of MLMP I/O rou- 
tines by using System/3 assembler macro instructions (see 
Chapter 2). The IBM System/3 Macros Feature expands 
these macro instructions into linkage to MLMP routines. 

Linkage to the MLMP routines is assembled as part of the 
user's program. The IBM System/3 Overlay Linkage Editor 
is then used to incorporate the MLMP routines in the 
user's object program. 



Figure 2 shows the relation of MLMP to the macro proc- 
essor, the overlay linkage editor, and user programs. 

Figure 3 shows the relationship of a user MLMP program to 
MLMP I/O routines, BSC DTFs, BSC 1013s and buffers, 
and the BSCA. 



User MLMP 

Source 

Program 



Macro 
Processor 



Assembler 



Overlay 
Linkage 
Editor 




The user assembler program includes 
macro instructions for MLMP I/O routines. 



Macro instructions are expanded into 
linkage to MLMP routines. 



The user program, which now includes 
linkage to the MLMP routines, is 
assembled. 



MLMP 
Routines 



MLMP routines are incorporated into 
the user's object program. 
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Figure 2. Generation of a User MLMP Object Program 
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Figure 3. Functional Control and Data Flow of MLMP 
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Telecommunications Lines Supported 

Following are the terminals and line connections supported 
by MLMP. For considerations unique to using a given ter- 
minal with MLMP, see Appendix A. 



Nonswitched Poin t-to Poin t 



• IBM 2972/2980 Banking Terminal System (supported 
in the United States only) as described in Component 
Description: IBM 2972 Models 8 and 1 1 General Bank- 
ing Terminal Systems, GL27-3020 

• IBM 3270 Information Display System as described in 
IBM 3270 Information Display System Component 
Description, GA27-2749 



MLMP supports point-to-point nonswitched connections 
with central processing units programmed according to the 
conventions described in General Information: Binary 
Synchronous Communications, GA27-3004. MLMP also 
supports point-to-point nonswitched connections with the: 

• IBM System/7 Teleprocessing Multiplexor (TPMM) as 
described in IBM System /7 Teleprocessing Multiplexor 
"TPMM" Programming Guide and Reference Manual 
Supporting RPQ D08011, SC34-1506 

• IBM 2770 Data Communication System as described in 
System Components: IBM 2770 Data Communication 
System, GA27-3013 

• IBM 2780 Data Transmission Terminal as described in 
IBM 2780 Data Transmission Terminal: Component 
Description, GA27-3005 



Multipoint 

MLMP supports System/3 as a control station and as 
a multidropped terminal. As a control station, 
System/3 can exchange binary synchronous data with: 

• IBM System/3 

• I BM System/7 as described in IBM System /7 Binary 
Synchronous Communications Module Programming 
Guide and Reference Manual, SC34-1 51 

• IBM System/7 Teleprocessing Multiplexor (TPMM) as 
described in IBM System/7 Teleprocessing Multiplexor 
"TPMM" Programming Guide and Reference Manual 
Supporting RPQ D08011, SC34-1506 

• IBM 2770 Data Communication System as described in 
System Components: IBM 2770 Data Communication 
System, GA27-3013 

• IBM 2780 Data Transmission Terminal as described in 
IBM 2780 Data Transmission Terminal: Component 
Description, GA27-3005 



• IBM 3735 Programmable Terminal as described in IBM 
3735 Programmer's Guide, GC30-3001 

• IBM 3600 Finance Communication System (Model 15 
only) as described in IBM 3600 Finance Communica- 
tion System Programmer's Guide and Component Des- 
cription, GC27-0004 



When System/3 is a control station, MLMP 

does not support intermixing of terminals on one line. 

Note: For information on how to generate IBM 3735 form 
descriptor programs (FDPs) on System/3, see IBM System /3 
Model W Disk System 3735 Application Package Coding 
Manual, GC21-5096. A conversion routine (FDP/Convert) 
is provided with MLMP to convert FDPs generated on OS 
or DOS to a format suitable for transmission from Model 
10 or Model 12 to a 3735. For a description of FDP/Convert, 
see index entry FDP/Convert. 

Switched Poin t- to-Poin t 

MLMP supports point-to-point switched connections with 
the following: 

• Central processing units programmed according to the 
conventions described in General Information: Binary 
Synchronous Communications, GA27-3004 



• IBM System/7 Teleprocessing Multiplexor (TPMM) as 
described in IBM System /7 Teleprocessing Multiplexor 
"TPMM" Programming Guide and Reference Manual 
Supporting RPQ D08011, SC34-1506 



• IBM 2770 Data Communication System as described in 
System Components: IBM 2770 Data Communication 
System, GA27-3013 

• IBM 2780 Data Transmission Terminal as described in 
IBM 2780 Data Transmission Terminal: Component 
Description, GA27-3005 
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• IBM 3275 Display Station as described in IBM 3270 
Information Display System Component Description, 
GA27-2749 

• IBM 3735 Programmable Terminals as described in IBM 
3735 Programmer's Guide, GC30-3001 

• IBM System/7 as described in IBM System/7 Systems 
Summary, GA34-0002 

For switched connections, MLMP supports autocall (United 
States only), manual call, autoanswer, manual answer, and 
the exchange of station identification characters. 

Note: For information on how to generate IBM 3735 form 
descriptor programs (FDPs) on System/3, see IBM System /3 
Model 10 Disk System 3735 Support Program Reference 
Manual, GC21-5096. A conversion routine (FDP/Convert) 
is provided with MLMP to convert FDPs generated on OS 
or DOS to a format suitable for transmission from Model 
10 to a 3735. For a description of FDP/Convert, see index 
entry FDP/Convert. 



Functions 

The following program functions are available to the MLMP 
user: 



Depending on the terminal used and whether or not data is 
exchanged in conversational mode, records transmitted 
and received can be fixed length, variable length, or span- 
ned (one record can occupy space in two contiguous blocks). 
Data can be exchanged in EBCDIC (Extended Binary Coded 
Decimal Interchange Code) or in ASCII (American Nation- 
al Standard Code for Information Interchange), depending 
on the BSCA used. Data translation is supported by trans- 
late tables generated with macro instructions. EBCDIC 
transparency and ITB (Intermediate Block Checking) are 
supported by MLMP. 

MLMP does not transmit leading graphics. MLMP can re- 
ceive leading graphics, but does not pass them to the user. 

During program execution, MLMP automatically does the 
following: 

• Blocks and deblocks data as required. 

• Moves user data from the user's logical buffer to the 
telecommunications I/O buffers when sending data 
(PUT requests). 

• Moves user data from the telecommunications I/O buf- 
fers to the user's logical buffer when receiving data 
(GET requests). 



1. Receive only (receive input data from a remote 
terminal). 

2. Receive with transmittal of conversational reply (re- 
ceive input data from a remote terminal and, when 
required, transmit data as an acknowledgement). 



• Inserts and removes data-link control characters as 
necessary. 

MLMP provides error recovery, error recording and, at 
user's request, online test (OLT). A trace module and a 
dump routine are also provided with MLMP. 



3. Transmit only (transmit data to a remote terminal). 

4. Transmit with reception of conversational reply 
(transmit data to a remote terminal and, when re- 
quired, receive data as an acknowledgement). 

5. Transmit and receive— no conversational reply. Four 
modes of operation are possible: 



Multiple Line Terminal Adapter 

The BSCA and the Multiple Line Terminal Adapter (MLTA) 
can be used concurrently on the disk system. For infor- 
mation regarding MLTA, see IBM System/3 Multiple Line 
Terminal Adapter RPQ Program Reference and Compon- 
ent Description Manual, GC21-7560. 



a. Transmit a file, then receive another file. 

b. Receive a file, then transmit another file. 

c. Transmit records of a file interspersed with re- 
ceiving records of another file (receive RVI). 

d. Receive records of a file interspersed with trans- 
mitting records of another file (transmit RVI). 



Chapter 2. System/3 Macro Instructions 



You inform MLMP of the functions your binary synchron- 
ous communications program requires by using System/3 
macro instructions. 



Description 

A System/3 macro instruction causes a specified sequence 
of assembler source instructions to be generated. The for- 
mat of a System/3 macro instruction is: 



1 




8 




14 


72 


Name 




Operation 




Operands 




symbol 
or blank 


» 


macro 
name 


16 


no operands 
or one or 
more 
operands 
separated by 
commas 





Name 

If you specify a name, it is assigned to the generated se- 
quence of assembler instructions. The name becomes the 
symbolic address of the first byte of code generated by the 
macro instruction and it can be used to reference the code 
— that is, to modify the code or to branch to the code. 

A name: 

• Must begin with an alphabetic character in position 1 
of the Assembler Coding Form 

• Can be from one to six alphameric characters in length 

• Must contain no special characters or blanks 

Note: System/3 macro instructions generate labels begin- 
ning with the dollar sign ($). If you also define labels 
beginning with $ when you use System/3 macro instruc- 
tions, duplicate labels may result. 

Operation 

The operation entry is the mnemonic operation code of the 
macro instruction. Each operation entry must begin in 
position 8 of the Assembler Coding Form. 



Operands 

Operands qualify the operation by specifying functions to 
be performed and data to be modified. Each operand con- 
sists of a keyword and a parameter joined by a dash. Key- 
words and parameters are predefined symbols available for 
use with individual macro instructions. You select key- 
words and parameters according to the rules that apply to 
the macro instruction you are writing. 

• The first operand must begin in position 14 of the 
Assembler Coding Form. 

• Operands must be separated by commas. 

• Blanks are not permitted between operands coded on the 
same line. 

• Blanks are not permitted between keywords and 
parameters. 

• Operands cannot be specified beyond position 71. 

• Operands can be written in any order. 



Continuation Lines 

The number of operands involved in some macro instructions 
may require more than one line of coding. If continuation 
is required, column 72 must contain a character and the last 
operand must be followed by a comma. An operand cannot 
be divided and continued on the next line. The operands 
of the continued field must begin in column 14. For an 
example of continuation coding, see Figure 4. 



Comments 

Comments can be placed after the last operand in a line if 
the comment is separated from the operand or comma by 
a blank. If a macro instruction has no operands, comments 
can be placed in the operand field if position 14 is left 
blank (Figure 4). 



System/3 Macro Instructions 7 



IBM 



IBM System/3 Basic Assembler Coding Form 



PROGRAMMER 



PUNCHING 
INSTRUCTIONS 





STATEMENT 


1 3 3 4 6 6 


7 8 9 10 11 12 


13 


Operand Remarks 
14 15 16 17 18 19 20 21 27 23 24 26 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 Rfi 57 5* RO fid fit R? fiT 64 fift 66 fi7 fia ■» 7fl 7, 77 t-i ti 


W 


A 


M 


6 


i 







P 


1 











P 


e 


R 


A 


N 


n 


1 







p 


B 


R 


A 


H 


P 


2 


1 





P 


£ 


R 


A 


M 


D 


3 







P 


£ 


e 


A 


tJ 


D 


4 




0PC&A 


UD 


5 




OPERANT* 


(, 


; 








X 































P 


e 


e 


A 


w 


D 


7 







p 


£ 


R 


A 


U 


Z> 


6 










e 





M 


H 


£ 


H 


T 






































































































































































































H 


A 


* 


e 


z 







P 


Z 











P 


B 


e 


A 


N 


D 


1 


j- 





p 


e 


e 


A 


W 


D 


I 


/ 




t 





M 


*t 


£ 


H 


T 




























































A 































P 


e 


« 


A 


M 


V 


3 


> 






























































































3 































P 


e 


R 


A 


N 


V 


t 
































































































/■ 































P 


E 


R 


A 


U 


D 


5 
































































































~r~~ 


1 


































































































































N 


A 


* 


£ 


3 







P 


3 










t 


o 


H 


H 


e 


u 


T 












































































































h 
































































































































































































































































































































































































































































































































































































































































! 


















































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































































----- 




















































































































































































































































































12 3 4 :, 6 


8 9 io ii 12 


13 


14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 


33 


34 


35 


36 


J7 


38 


39 


40 


4! 


42 


43 


44 


46 


46 


47 


48 


49 


50 


51 


52 53 


S4 


55 56 


■47 


Sfl 


59 


60 


fil 


62 63 64 


fi5 


fifi 


fi7 


fifi 


m 


70 7 




74 7 



Figure 4. Sample of Continued Macro Instructions and Comments 



Conventions 

Certain symbols are used in this manual to abbreviate the 
descriptions of macro instructions. 



1 


8 


14 


| [name] 


$OP 


KEYWORD- A/B/C 



BRACKETS [ ] indicate an optional entry. 
SLASHES / separate entries when a choice exists. 



UNDERSCORE indicates the default if a parameter is 

not specified. 

UPPER CASE LETTERS indicate words or abbreviations 
that must be entered as shown. 

LOWER CASE LETTERS indicate information you must 
supply. 

Each MLMP macro instruction is described in detail in 
Chapter 3. All MLMP macro instructions are summarized 
in a chart in Appendix E. The chart also gives the approxi- 
mate length of code generated by each macro instruction. 



Chapter 3. MLMP Programming 



Every MLMP program you write must accomplish three 
major functions: 

1. Prepare BSC files for reception and/or transmission 
of data. 

2. Initiate the transfer of data: receive and/or transmit. 

3. Terminate the transfer of data. 

Before programming these functions, however, note that 
one EXTRN must be defined in every MLMP program 
($$BSMS). Other required EXTRNs are generated by the 
MLMP macro instructions when MLMP programs are 
assembled. 



PREPARING FOR DATA TRANSFER 

Preparing for data transfer always includes the following 
three steps: 

1. Generate labels and equates for use by the various 
macro instructions and generate field displacements 
and labels for the BSC DTFs. Common labels and 
equates are generated by the $COMN macro 
instruction when your MLMP program is 
assembled. BSC DTF field displacements and labels 
are generated by the $DTOB macro instruction when 
your MLMP program is assembled. 

2. Prepare BSC data files. Each BSC file must be: * 

a. Defined ($DTFB macro instruction) 

b. Allocated ($ALOC macro instruction) 

c. Opened ($OPEN macro instruction) 

3. Create a checklist to check for I/O completion. 
Entries in the checklist are created by the $CKL 
macro instruction. 



If your station is a control station, you must create a 
polling/addressing list. Entries in a polling/addressing list 
are created by the $POLB macro instruction. Entries in 
a polling list can be activated or deactivated by using the 
$BCPL macro instruction (stations identified in active 
entries in a polling list are polled, stations identified in in- 
active entries are not polled). The $CHGB macro instruc- 
tion can be used to generate the parameter list required by 
$BCPL. 

Control stations must also provide space for logging termi- 
nal statistics. The $LOGB macro instruction can be used 
to allocate space for the Terminal Statistics Logging Area. 

If you are using a switched answer line, you can create a 
list containing the station identification sequences (station 
IDs) your station will accept from a remote terminal. 
Entries in the switched ID list are created by the $SWIB 
macro instruction. The $BCSW macro instruction can be 
used to activate or deactivate entries in the list. (If an entry 
is inactive, your station will not accept the station ID given 
in that entry.) The $CHGB macro instruction can be used 
to generate the parameter list required by $BCSW. 

If data in your BSC files requires translation, either before 
it is transmitted or after it is received, you must provide 
for data translation by constructing translate tables 
($TRTB macro instruction for EBCDIC/ASCII tables) and 
generating a translate parameter list ($TRL macro instruc- 
tion). When you want to translate data, generate the inter- 
face to the IBM-provided translate routine ($TRAN macro 
instruction). 
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Note: If you are transmitting translated data or receiving 
data that must be translated, be sure you have given the 
following information in the correct data code (EBCDIC or 
ASCII): 

1 . Polling and/or addressing characters if you are a control 
or tributary station. 

2. Station identification sequences if you are on a switched 
line. 

3. Online test parameter lists (generated by the $RFTL 
macro instruction) and online test messages if you intend 
to request online tests (see index entry online test). 

Generate Common Equates ($COMN) 

The $COMN macro instruction generates labels and equates 
used by System/3 macro instructions. This macro instruc- 
tion must be issued once in every assembler program con- 
taining System/3 macro instructions. 



$COMN Macro Instruction Format 



$COMN \ 



Generate BSC DTF Displacements and Labels ($DTOB) 

BSC DTF field displacements and labels must be defined 
once in every MLMP program. The $DTOB macro instruc- 
tion generates field displacements and associated labels 
for BSC DTFs. These displacements and labels, as well as 
BSC DTF byte and bit definitions and a definition of MLMP 
completion codes (see index entry completion code), are 
included in your assembly listing. 

The generated BSC DTF labels are used by the code your 
MLMP macro instructions generate and you can use the 
labels to reference fields in the BSC DTFs. 



See index entry BSC DTF for the labels generated by $DTOB. 
SDTOB Macro Instruction Format 



$DTOB 



_) 



Define the File for BSC ($DTFB) 

The $DTFB macro instruction generates a BSC DTF. More 
than one BSC file can be defined for each telecommunica- 
tions line. See Appendix C for the format of the BSC 
DTFs. See also index entry open BSC files ($OPEN). 



$DTFB Macro Instruction Format 



[name] 


$DTFB 


RECL-decdig,BLKL-decdig, 

RCAD-address,FTYP-RCV/TSiM 

[,BUFST-address,BUFEND-acldress] 

[,BUFNO-decdig] 

[.CODE-E/A] [,LINE-i/2] 

[,UP-binary/0] [,CHN-name] 

[,CONV-Y/N] [.ITB-Y/N] 

[.TRANSP-Y/N] 

[,RVIADR-address,RVIMSK-hex] 

[,DLYCT-decdig] 

CTYPE-EP/MP/CS/AC/MC/AA/MA] 

[,TERMAD-hex] [,AUTORS-Y/N] 

[,LISTAD-address,ERRLOG-address] 

[.POLRES-Y/N] 

[,LIMIT-decdig] 

[,DIAL-address,DIALCT-decdig] 

[,RCVID-address,RCVCT-deodig/ 

,SWLIST-Y/N] 

t ,SN D 1 D-address,SN DCT-decdig] 

[.SPAN-Y/N] 

[,RECSEP-hex] [,ERRCT-decdig] 
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FTYP-RCV/TSM 



If a name is specified, it is assigned to the first byte of the 
generated BSC DTF. 



RECL-decdig 

Specifies, in decimal, the maximum record length for this 
file, excluding line control characters. Record length is 
limited by available storage and terminal characteristics 
such as those listed in Appendix A. See index entry $DTFB 
considerations. 



BLKL-decdig 

Specifies, in decimal, the maximum block length for this 
file, excluding line control characters. Block length must 
be equal to or greater than record length (RECL operand). 
See index entry $DTFB considerations. 



Indicates whether the first operation for tnis file is receive 
(RCV) or transmit (TSM). If you define a receive file (RCV) 
the first I/O request for the file must be a GET request 
(see index entry $GETB macro instruction); if you define 
a transmit file (TSM), the first I/O request for the file must 
be a PUT request or a request for an online test (see index 
entries $PUTB macro instruction and online test). 



BUFST-address 

Specifies the symbolic address identifying the first byte 
of the area available to this file for I/O buffers and lOBs 
(input/output blocks). 

Note: Each BSC file requires a unique I/O area. 



BUFEND-address 



RCAD-address 

Specifies the symbolic address identifying the first byte of 
your logical buffer. The required size of the logical buffer 
depends upon the kind of operations requested for this file: 

• If this is a receive file and OPC-N will be specified in 
GET requests for this file, the logical buffer must be 
large enough to contain one record for this file. 

• If this is a receive file and OPC-BLK will be specified in 
GET requests for this file, the logical buffer must be 
large enough to contain the largest block of data ex- 
pected, including line control characters. 

For a description of OPC-N and OPC-BLK, see index 
entry $GETB macro instruction. 



Specifies the symbolic address identifying! the last byte of 
the area available to this file for I/O buffers and lOBs. For 
formulas necessary to calculate the length of MLMP I/O 
areas, see index entry MLMP I/O area. See also index 
entry online test if you intend to use the online test. 



BUFNO-decdig 

Specifies the number of I/O buffers and lOBs to be con- 
tained in the I/O area for this file, and specifies that the 
I/O area is to be allocated by this $DTFB macro instruc- 
tion. (See index entry MLMP I/O area.) 

Note: Either BUFST and BUFEND or BUFNO should be 
specified. Otherwise, the $DTFB macro instruction allo- 
cates enough I/O area to contain only one IOB and buffer. 



• If this is a transmit file, the logical buffer must be large 
enough to contain one record for this file. 

Records are moved from the logical buffer to the BSC 
I/O buffers on PUT requests ($PUTB macro instruction), 
and moved from the BSC I/O buffers to the logical 
buffer on GET requests ($GETB macro instruction). See 
index entry move mode. 
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By TNL: GN21-5587 

CODE- -E/A 

Specifies whether the character code of your data is 
EBCDIC (E) or ASCII (A). The character code you use is 
determined by the transmission code feature installed on 
your BSCA. 

LINE- 1/2 

Specifies the BSCA this file uses; adapter 1 or adapter 2. 
The ,7 BSCA operation control language (OCL) statement 
can override this operand. For OCL information, see the 
appropriate system control programming reference manual 
listed in trie Preface. 

UP -binary/0 

Specifies the conditional opening of a DTF. If the bits 
specified, in binary, are on in the external indicator 
letting given by the last SWITCH OCL statement, the 
DTF is opened. The default specifies the unconditional 
opening of a DTF. For OCL information, see the approp- 
riate system control programming reference manual listed 
in the Preface. 

CHN— name 

Specifies the symbolic address of the next DTF in the 
chain. Chained DTFs are allocated, opened, or closed at 
the same time as the first DTF in the chain. An end-of- 
chain indicator, X'FFFF', is entered in the DTF if no chain 
operand is given. 



TRANSP-Y/N 

I Specifies whether data for this file will be transmitted in 
transparent mode; Y if yes, N if no. Transparency may be 
specified only if the transparency feature is installed on the 
BSCA used. If N is specified and transparent data is 
received, no error occurs and the $BCRAN bit is set in the 
SBDATT field of the BSC DTF. 



RV I ADR -address 

Specifies the symbolic address of a one-byte field you pro- 
vide. The field is used with the mask specified in the 
RVIMSK operand (following paragraph) to indicate when 
a reverse interrupt request (RVI) is received or is to be 
sent. See index entry reverse interrupt for example; of 
using reverse interrupts. RVI ADR-address requires the 
RVIMSK operand. 



RVIMSK hex 

Specifies two hexadecimal characters to represent the 
reverse interrupt (RVi) mask. The bits represented by the 
mask are set on by MLMP in the RVIADR field (preceding 
paragraph) if a reverse interrupt request (RVI) is received 
from a remote terminal. If a reverse interrupt request is 
to be sent to a remote terminal, you must set on the mask 
in the RVIADR field. See index entry reverse interrupt 
for examples of using reverse interrupts. RVIMSK-hex 
requires the RVIADR operand. 



CONV-Y/N 

Specifies whether conversational replies can be sent from or 
to this file: Y if yes, N if no. 

Note: Block length (BLKL operand) must equal record 
length (RECL operand) for a conversational file. 



ITB-Y/N 

Specifies whether intermediate block checking is requested; 
Y if yes, N if no. Intermediate block checking is not per- 
mitted for a conversational file. 



DLYCT-decdig 

Specifies a decimal delay count. The delay count is the 
number of seconds after receiving or transmitting a block 
of data that MLMP will wait for you to receive or transmit 
another block of data for the same file. MLMP waits the 
specified number of seconds by using the WACK ErvQ and 
TTD NAK line control sequences. 

Except when you have received or transmitted end of file, 
MLMP aborts transmission and posts the $BCLST com- 
pletion code if the delay count is exhausted between trans- 
missions. (See index entry completion code. ) 

If you do not specify a number, a 180-second delay count 
is assumed. If you do specify a delay count, consider the 
time that may be required for such things as device errors, 
halts, and readying I/O devices. 
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TYPE- 



TERM AD-hev 



This operand specifies the type of line connection to be 
established for this file. You must have the appropriate 
network attachment feature installed before specifying 
one of the following line types: 



PP 



Specifies that this file will use a point-to-point non- 
switched line. PP is assumed if no line type is specified. 



MP 



Specifies that this file will use a multipoint line, and this 
station is a tributary station. TYPE-MP requires the 
TERMAD operand. 



CS 



Specifies that this file will use a multipoint line, and this 
station is the control station. TYPE-CS requires the 
LISTAD and ERRLOG operands. 



AC 



Specifies that this file will use a switched line, autocall. 
TYPE-AC requires the DIAL and DIALCT operands. 



MC 



Specifies that this file will use a switched line, manual 
call. 



AA 



Specifies that this file will use a switched line, auto 
answer. 

MA 

Specifies that this file will use a switched line, manual 
answer. 



Specifies the hexadecimal representation of the two- 
character polling or addressing sequence used by this file. 
If this is a transmit file (FTYP-TSM), TERMAD specifies 
polling characters; if this is a receive file (FTYP-RCV), 
TERMAD specifies addressing characters. 

Each tributary station on a multipoint line must have 
unique polling and/or addressing character:;. See index 
entry tributary System/3 polling and addressing characters 
for the polling and addressing characters available to identify 
System/3 tributary stations. See also index entry polling/ 
addressing. 

The TERMAD operand is used only when TYPE-MP is 
specified. 

AUTORS-Y/N 

Specifies whether MLMP will automatically send a negative 
response to polling and addressing sequences received after 
data transfer for this file is complete; Y if yes, N if no. If 
AUTORS-Y is specified, MLMP will continue to respond 
negatively to polling and addressing sequences until another 
MLMP I/O request ($GETB, $PUTB. or $RFT) is issued for 
the line, or until a request to close the MLMP files (SCLOS) 
is issued. (See index entry macro instructions.) If 
AUTORS-N is specified or if AUTORS is not specified at 
all for a tributary station, the tributary station will be on- 
line with the control station only when an MLMP I/O re- 
quest ($GETB, $PUTB, or $RFT) has been accepted. 

AUTORS— Y enables a tributary station to remain online 
with the control station after initial data transfer, even 
though data transfer is not occurring. When a tributary 
remains online until all data transfer between it and the 
control station is complete, the control station spends no 
time waiting for the tributary to respond to polling or 
addressing. 

AUTORS is used only when TYPE-MP is specified, and 
the AUTORS operand must be specified the same way in 
all $DTFB macro instructions written for the same BSC 
line. 
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LISTAD-address 

Specifies the symbolic address identifying the first byte of 
the polling or addressing list used by this file. If this is a 
transmit file (FTYP-TSM), LISTAD points to an addressing 
list; if this is a receive file (FTYP-RCV), LISTAD points 
to a polling list. See index entry polling/addressing. 

LISTAD is required only when TYPE-CS is specified. 



ERRLOG-address 

Specifies the symbolic address identifying the first byte of 
an area in main storage to be used for logging transmission 
statistics by terminal. You must provide one such area 
for each telecommunications line used ($LOGB macro 
instruction); and each area must be large enough to con- 
tain statistics for each unique polling and addressing se- 
quence used in your program. For the format of this log- 
ging area and a formula for computing its size, see index 
entries $LOGB Macro Instruction and Terminal Statistics 
Logging Area. 



ERRLOG is required only when TYPE-CS is specified. 

Note: Only one terminal statistics logging area per line is 
required in your program. Therefore, all ERRLOG oper- 
ands specified for DTFs using the same line will be 
identical. 



POLRES-Y/N 

Specifies whether the control station modules required to 
poll and address tributaries, log terminal statistics, and 
close active files are to be resident in main storage; Y if yes, 
N if no. 

Specifying POLRES-Y for control stations saves a signifi- 
cant amount of execution time because transient modules 
do not have to be found and loaded from the disk object 
library each time the control station polls or addresses a 
tributary, logs terminal statistics, or closes an active file. 

POLRES is used only when TYPE-CS is specified, and the 
POLRES operand must be specified the same way in all 
$DTFB macro instructions written for the same BSC line. 



LIMIT-decdig 

Specifies the number of times, in decimal, MLMP will 
accept a negative response from each terminal in a wrapped 
polling or addressing list before posting the SBCNIEG com- 
pletion code (see index entry completion code). Valid 
entries are 1-254. If no number is specified, MLMP passes 
through a wrapped list until a positive response is received, 
an error is encountered, or the poll is canceled (seei index 
entry $CANB macro instruction). 



LIMIT is used only when TYPE-CS is specified. 

Note: Consider defining LIMIT for any addressing list 
created by a $POLB macro instruction in which LAST- 
WRAP was specified. See index entry $POLB macro 
instruction. 
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DIAL-address 



SNDCT-decdig 



Specifies the symbolic address identifying the first byte of 
the field containing the decimal number that must be dialed 
to extablish a switched connection. This operand is used 
only when TYPE-AC is specified. DIAL-address requires 
the DIALCT operand (see following paragraph). 



Specifies, in decimal, the length of the identification sequence 
required by the remote station. Length can be 1-15. If 
1 is specified, MLMP transmits 2 characters — duplicates 
of the character addressed by the SNDID operand (preced- 
ing paragraph). SNDCT-decdig requires the SNDID 
operand. 



DIALCT-decdig 

Specifies, in decimal, the length of the number that must 
be dialed to establish a switched autocall connection. The 
maximum length permitted is 12. This operand is used 
only when TYPE-AC is specified, and requires the DIAL 
operand. 



RCVID-address 

Specifies the symbolic address of the first byte of either the 
identification sequence required from the remote station 
or of the switched ID list (see index entry switched ID list 
for the format of the list). RCVID-address requires either 
the RCVCT operand or SWLIST - Y. Using RCVID and 
RCVCT or RCVID and SWLIST-Y improves data security 
on switched lines; these operands are recommended for 
all switched lines. 



SPAN-Y/N 

Specifies whether records in this file will span blocks of 
text; Y if yes, N if no. A spanned record must be contained 
within two contiguous blocks of text. 

When spanned records are received or transmitted, DTF 
fields $BDWKB and $BDREL are altered. The fields are 
restored after successful I/O completion. If an error occurs 
during transmission of spanned records, you must restore 
$BDWKB and $BDREL before requesting another operation 
for the file. 

SPAN— Y requires the RECSEP operand if this is a receive 
file (FTYP-RCV). See index entry $DTFB considerations 
See also index entry BSC DTF for the format of the BSC 
DTF. 



RCVCT-decdig 

Specifies, in decimal, the length of the identification se- 
quence required from the remote station. Length can be 
1-15. If 1 is specified, MLMP expects to receive 2 charac- 
ters - duplicates of the character addressed by the RCVID 
operand (preceding paragraph). If no length is specified, 
is assumed. RCVCT-decdig requires the RCVID operand. 



SWLIST-Y/N 



RECSEP-hex 

Specifies the hexadecimal representation of a one-character 
record separator used to separate variable length records 
in blocks of text. See index entry $DTFB considerations. 

ERRCT-decdig 

Specifies the number of times, in decimal, that MLMP re- 
tries an unsuccessful operation before posting an error con- 
dition. Valid entries are 1-254. If no number is specified, 
an error retry count of 7 is assumed. 



Specifies whether this switched answer line will use the 
switched ID list (see index entry switched ID list for the 
format of the list); Y if yes, N if no. SWLIST-Y can be 
specified only when TYPE-AA or TYPE-MA is specified. 
SWLIST-Y requires the RCVID operand. 



Note: ERRCT specifies an error retry count only for the 
local MLMP program; ERRCT does not affect the remote 
terminal. In an error situation occurring between two 
terminals with different retry counts, the lower retry count 
determines when the error becomes permanent. 



SNDID-address 



$DTFB Considerations 



Specifies the symbolic address of the first byte of the iden- 
tification sequence required by the remote station. SNDID- 
address requires the SNDCT operand. Using the SNDID 
and SNDCT operands improves data security on switched 
lines; these operands are recommended for all switched 
lines. 



MLMP supports three kinds of record formats: fixed length, 
variable length, and spanned. The kind of format you choose 
determines the way in which four $DTFB operands must 
be specified: RECL-decdig, BLKL-decdig, SPAN-Y/N, 
and RESCEP-hex. 
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Fixed Length: If you choose to use fixed length records: 

1. Specify the record length in the RECL operand. 

2. Specify a multiple of the record length in the BLKL 
operand. 

3. Do not code the SPAN and RECSEP operands. 



OPC— BLK is recommended for each GET request (see 
index entry $GETB macro instruction) if you are to re- 
ceive variable length records that do not contain record 
separators. When OPC-BLK is specified in a GET request, 
the length of the block received is moved to $BDREL in 
the DTF. See index entry BSC DTF for the format of the 
DTF. 



Variable Length: Variable length records can change in 
length from one transmission to another. If you choose to 
use variable length records: 

1. RECL-The value specified in the RECL operand 
should be the maximum expected record length. How- 
ever, when you transmit variable length records you 
must move the length of each record to SBDREL in 
*e DTF before you issue $PUTB to transmit the 

jord. ,See index entry BSC DTF for the format of 
the DTF.) After each successful GET request issued 
to receive one or more variable length records (com- 
ietion code = SBCDNE): 

• The length of the block received, including control 
characters, is moved to $BDREL if you specified 
OPC-BLK in SGETB (see index entry $GETB 
macro instruction) , 

or 

• The length of the record received, including the 
record separator, is moved to SBDREL if you 
specified the RECSEP operand in $DTFB (see 
item 4 following). 

2. BLKL-The block length you specify should be the 
maximum expected block length. 

3 SPAM— Variable length records may or may not be 
spanned (see following paragraph). 

4. RECSEP-Although record separators are not re- 
quired with variable length records, you may want to 
use a record separator to delimit the records. If 
you do specify a record separator, MLMP automati- 
cally inserts the record separator at the end of each 
record transmitted. The record separator is the last 
data character moved to your logical buffer (addressed 
by the RCAD operand) when you receive variable 
length records. 



Spanned: Spanned records can be fixed or variable length. 
If you choose to use spanned records: 



1. 

2. 
3. 



Specify RECL and BLKL according to the format, 
frxed or variable length, you choose (see two pre- 
ceding paragraphs). 

Specify SPAN-Y. 

Specify a record separator character (RECSEP oper- 
and). See index entry MLMP message formats 
for an illustration of spanned records. 

Note: The 3735 transmits spanned records. For for- 
matting considerations unique to the 3735, see IBM 
3735 Programmer's Guide, GC30-3001 . 



Allocate BSC Files ($ALOC) 

Every BSC file must be allocated; that is, the BSCA required 
by each file must be reserved for the file before the file can 
be processed. All files in your program must be allocated 
before you begin any telecommunications I/O operations. 
The $ALOC macro instruction generates code that effects 
a branch to a system allocate routine. The system allocate 
routine reserves the devices identified by the $ALOC macro 
instruction. 

Note: $ALOC must not be issued while BSC I/O operations 
are being executed. 



$ALOC Macro Instruction Format 



| [name] |~$ALOC | [DTF-nam e] 
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If you specify the keyword DTF, enter, as the parameter, 
the name of the DTF (file) to be allocated. If the operand 
is not given, the address of the DTF is assumed to be in 
register 2. 

If the DTF specified is in a chain, all DTFs following in the 
chain are opened by this request. (MLTA DTFs must not 
be in the chain. For information regarding MLTA, see IBM 
System/3 Multiple Line Terminal Adapter RPQ Program 
Reference and Component Description Manual, 
GC21-7560.) 

After $ALOC is executed, register 2 contains the address 
of the first DTF allocated. 



Open BSC Files ($OPEIM) 

Every BSC file must be opened. The DTF and I/O area 
used by the file must be prepared to accommodate the 
data composing the file, and a DTF must be generated. 
The $OPEN macro instruction generates code that effects a 
branch to a system open routine; the routine opens the files 
identified by the SOPEN macro instruction. 

Note: If you reopen a BSC file that has been closed (see 
index entry $CLOS macro instruction), record length, 
block length, and all other file attributes will be the same 
as they were at the time the file was closed. 



Page of GC21-7573-4 
Issued 21 December 1979 
By TNL: GN21-5691 

After SOPEN is executed, register 2 contains the address of 
the last DTF opened. 



Generate a Model 10 and Model 12 Checklist ($CKL) 

The Model 10 Disk System, Model 12, and Model 15 use 
a macro named $CKL to generate a checklist. Since there 
are differences in parameters and in function, checklist 
macros are discussed separately. 

One $CKL macro instruction creates one entry in a check- 
list. A checklist identifies DTFs to be checked for I/O com- 
pletion by the $CHK macro instruction. The kinds of 
DTFs that can be identified by the checklist are: BSC DTFs, 
MLTA DTFs, and console DTFs. The SCKL macro instruc- 
tions required to create a particular checklist must be coded 
consecutively. See index entry checklist for the format of 
the checklist. See also index entry check for I/O 
completion ($CHK). 



Model 10 and Model 12 $CKL Macro Instruction Format 



[name] 


SCKL 


DTF-address [.SKIP-Y/NJ 
LREQK-Y/N or ,'CONS-Y/N] 
[.RTN-Y/N] [.LAST-Y/N] 



name 



$OPEN Macro Instruction Format 



[name] 


SOPEN 


[DTF— name] 



If you specify the keyword DTF, enter, as the parameter, 
the name of the DTF (file) to be opened. If the operand is 
not given, the address of the DTF is assumed to be in 
register 2. 

If the DTF specified is in a chain, all DTFs following in the 
chain are opened by this request. (MLTA DTFs must not 
be in the chain. For information regarding MLTA, see IBM 
System /3 Multiple Line Terminal Adapter RPQ Program 
Reference and Component Description Manual, 
GC21-7560.) 



A name given to a SCKL macro instruction becomes the 
symbolic address of the first byte of the generated check- 
list entry. The name can then be used to address the entry 
if you want to change the entry. 

DTF— address 

Specifies the symbolic address of the first byte of the DTF 
for which this entry is being created. 

SKIP-Y/N 

Specifies whether this entry should be skipped when the 
checklist is scanned; Y if yes, N if no. 
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REQK-Y/Nor CONS-Y/N 

Specifies whether the check routine (see index entry $CHK 
macro instruction) should check for console requests (REQ 
key pressed); Y if yes, N if no. Whenever you want the 
check routine to check for console requests, you must in- 
clude a console DTF in the checklist and specify REQK-Y 
or COIMS-Y for that entry. REQK-Y and CONS-Y are 
ignored if they are specified for a DTF that is not a console 
DTF. (A device code of X'10' in the first byte of a DTF, 
field SBDDEV, denotes a console DTF.) If the operator 
has pressed the REQ key, a completion code of X'50' is 
posted in the console DTF. 

If a console DTF is to be used for both request key and 
data input at the same time, two entries (REQK-Y and 
REQK-N) must be specified in the checklist for that DTF. 

For more information regarding console operations, see 
IBM System /3 Models Wand 12 Control Programming 
Macros Reference Manual, GC21-7562. 

RTN-Y/N 

Specifies whether you want control returned from the 
check routine even if no I/O operation is complete; Y if 
yes, N if no. The RTN operand is effective only when 
specified for the first entry in the checklist, and applies to 
all entries in the list. See completion code $BCCMP (index 
entry completion code). 

LAST-Y/N 

Specifies whether this is the last entry in the checklist; Y 
if yes, N if no. LAST-Y must be specified for the last 
entry in the checklist. 



Generate a Model 15 Checklist ($CKL) 

One $CKL macro instruction creates one entry in a check- 
list. A checklist identifies DTFs to be checked for I/O 
completion or for depression of Program Function Key 9 
(PF9). The kinds of DTFs that can be identified by the 
checklist are: BSC DTFs, and dummy DTFs which are 
15-byte DTFs used for the PF9 key. See index entry 
checklist for the format of the checklist. See also index 
entry check for I/O completion ($CHK). 



Model 15$CKL Macro Instruction Format 



$CKL 



DTF-address [.SKIP-Y/N] 
[REQK-Y/NJ 
LRTN-Y/N1 [.LAST-Y/N] 



A name given to a $CKL macro instruction becomes the 
symbolic address of the first byte of the generated check- 
list entry. The name can then be used to address the entry 
if you want to change the entry. 

DTF-address 

Specifies the symbolic address of the first byte of the DTF 
for which this entry is being created. A 15-byte dummy 
DTF is required to check whether Program Function Key 9 
has been pressed. Displacement X'OO" should contain X'10' 
and a completion code will be returned in displacement X'OI 

SKIP-Y/N 

Specifies whether this entry should be skipped when the 
checklist is scanned; Y if yes, N if no. 

REQK-Y/N 

Specifies whether the check routine (see index entry 
SCHK macro instruction) should check to see if the 
Program Function Key 9 (PF9) has been pressed; Y if yes, 
N if no. Whenever you want the check routine to check for 
PF9 requests, you must include a dummy DTF in the 
checklist and specify REQK-Y for that entry. REQK-Y is 
ignored if it is specified for a DTF that is not a dummy 
(PF9) DTF. (A device code of X'10' in the first byte of a 
DTF denotes a dummy [PF9] DTF.) If the operator has 
pressed the PF9 key, a completion code of X'50' is posted 
at displacement X'OE' of the dummy (PF9) DTF. 

For more information regarding PF9 operations, see IBM 
System /3 Model 15 System Control Programming Macros 
Reference Manual, GC21-7608. 



18 



RTN-Y/ft 



ID-hex 



Specifies whether you want control returned from the check 
routine even if no I/O operation is complete; Y if yes, N if 
no. The RTN operand is effective only when specified for 
the first entry in the checklist, and applies to all entries in 
the list. See completion code $BCCMP (index entry comple- 
tion code). 



LAST-Y/fi 

Specifies whether this is the last entry in the checklist, Y 
if yes, N if no. LAST-Y must be specified for the last 
entry in the checklist. 



Generate a Polling/ Addressing List ($POLB) 

If your station is a control station (TYPE-CS in the $DTFB 
macro instruction), you must generate a polling or address- 
ing list in order to poll or address tributary stations. GET 
requests require a polling list; PUT requests require an 
addressing list. See index entries $GETB macro instruc- 
tion, and $PUTB macro instruction. 

One $POLB macro instruction creates one entry in a poll- 
ing or addressing list; each entry contains one sequence of 
polling or addressing characters. An addressing list con- 
tains only one entry. Polling lists may contain a number 
of entries; the $POLB macro instructions that create a poll- 
ing list must be coded consecutively. 

For the format of polling/addressing lists, see index entry 
polling/addressing list. See also index entry tributary 
System/3 polling and addressing characters. 



Specifies two hexadecimal characters to identify this entry 
in the polling/addressing list. Valid entries are X'OO' throuah 
X'EF'. 

When an entry in a polling/addressing list is used to poll or 
address a tributary station, MLMP places the entry ID in 
the BSC DTF at SBDIND (see index entry BSC DTF for the 
format of the DTF). If you specify a unique ID for each 
entry in a polling list, you can determine which station was 
polled last by checking the contents of $BDIND after a 
completion code has been posted (see index entry $CHK 
macro instruction). 

You can specify which station will be polled first in a 
polling sequence by moving the ID from the related polling 
list entry to the DTF before you issue the first GET request 
for that file (see index entry $GE TB macro instruction). 
The ID you move must be different from the previous ID 
in SBDIND. 

If you move X'FG" to $BDIND all entries in the list are 
activated, and polling begins with the first entry in the 
list. If you move X'FT to SBDIND polling begins with the 
first entry in the list, but only entries that are currently 
active are included in the poll. 

When an MLMP program is assembled, $BDIND is set to 
X'F1'. MLMP always considers addressing lists to be 
active. 

For more information on how to change a polling list, see 
index entry change a polling list ($BCPL). 



TERMAD-hex 



$POLB Macro Instruction Format 



[name] 



$POLB 



ID-hex,TERMAD-hex,LEN-decdig 
LLAST-N/OPEN/WRAP] 



name 

A name given to a $POLB macro instruction becomes the 
symbolic address of the first byte of the polling/addressing 
entry generated. The name can then be used to address 
the entry if you want to change the entry. See also index 
entry change a polling list ($BCPL). 



Specifies the hexadecimal representation of up to 7 polling 
or addressing characters. The polling or addressing charac- 
ters must not include any of the line control characters 
shown in Appendix D. Appendix D also show:s the polling 
and addressing characters available for System/3 tributary 
stations. 
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LEN— decdig 



Change a Polling List (SBCPL) 



Specifies, in decimal, the number of bytes represented in 
the TERMAD operand. Decdig must not be greater than 7. 



LAST-N 

Specifies that this entry is not the last entry in the polling 
list. 



-OPEN 

Specifies that this is the last entry in the polling/addressing 
list, and that polling or addressing must end even if a posi- 
tive response is not received ($BCNEG completion code). 

Note: After polling the last station in an open polling list, 
move the ID of the first entry in the polling list, (X'FO', 
or X'F1') to $BDIND if you expect to use the polling list 
again in your program. See the preceding description of 
the ID operand. 



The SBCPL macro instruction enables you to activate and 
deactivate selected entries in a polling list created by the 
$POLB macro instruction. For example, you can use the 
$BCPL macro instruction to: 

• Deactivate entries you have decided not to use. You 
may want to deactivate an entry if the terminal does not 
respond to polling ($BCNON completion code). See 
index entry completion code. 

• Reactivate entries that have been deactivated. 

Note: $BCPL requires approximately 1 10 bytes of main 
storage plus the space required by the parameter list. Un- 
less you have a large number of polling entries to change, 
you can activate and deactivate polling entries more effi- 
ciently yourself by changing the status byte in polling 
entries. See index entry polling/addressing list 



$BCPL Macro Instruction Format 



-WRAP 

Specifies that this is the last entry in a polling list, or is an 
addressing entry. If a positive response is not received, 
polling must continue from the beginning of the list, or 
addressing must continue, until a positive response is re- 
ceived, an error is encountered, or LIMIT is reached (LIMIT 
is defined in the $DTFB macro instruction). 



Either LAST-OPEN or LAST-WRAP is required in the 
last entry of a polling list and in all addressing entries. If 
LAST-WRAP is specified for a polling list, the polling 
cycle can always be canceled by the $CANB macro instruc- 
tion (see index entry $CANB macro instruction). However, 
to prevent an infinite addressing loop in the event that a 
negative response (NAK) is received from the terminal 
addressed, LIMIT must be defined in $DTFB (see index 
entry $DTFB macro instruction) whenever LAST-WRAP 
is specified for an addressing list. 



1 [name] | $BCPL | [PARM-addressl 



PARM-address 

Specifies the symbolic address of a parameter list you pro- 
vide. The parameter list defines the changes you want to 
make to a polling list. For the format of the parameter 
list, see index entry parameter list for changing a polling 
list or switched ID list. You can use the $CHGB macro 
instruction to generate the parameter list. See index entry 
$CHGB macro instruction. 

If the PARM operand is not specified, the address of the 
parameter list is assumed to be in register 1. 

After SBCPL is executed, register 1 contains the address of 
the parameter list. 
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Generate a Parameter List for Changing a Polling List or a 
Switched ID List ($CHGB) 

The $CHGB macro instruction generates a parameter list 
for changing a polling list (see index entry $BCPL macro 
instruction) and for changing a switched ID list (see index 
entry $BCSW macro instruction). For the format of this 
parameter list, see index entry parameter list for changing a 
polling list or switched ID list. 



DN 



Deactivates selected entries, selecting only those entires 
whose first N characters match the first N characters speci- 
fied in the CHARS operand, where N is the number speci- 
fied in the NUM operand. 



DTF— address 



$CHGB Macro Instruction Format 



Specifies the symbolic address of the DTF whose polling 
list or switched ID list is to be changed. 



[name] 


SCHGB 


TYPE-AM/AN/DM/DN,DTF-address, 
NUM-hex,CHARS-hex 



name 



A name given to a SCHGB macro instruction becomes the 
symbolic address of the first byte of the generated param- 
eter list. The name can then be used to address specific 
fields in the list if you want to change the fields. 



TYPE- 



NUM-hex 

Specifies in hexadecimal how many of the characters speci- 
fied in the CHARS operand are to be compared to charac- 
ters in polling list or switched ID list entries. 



CHARS-hex 

Specifies the hexadecimal representation of characters to 
be compared to characters in polling list or switched ID 
list entries. 



Specifies the changes to be made in the polling/addressing 
or switched ID list. 



AM 



Activates selected entries, selecting only those entries whose 
characters exactly match the characters specified in the 
CHARS operand. 



Allocate the Terminal Statistics Logging Area; (SLOGB) 

The SLOGB macro instruction allocates space for the 
Terminal Statistics Logging Area (see index entry Terminal 
Statistics Logging Area) for control stations (TYPE— CS in 
SDTFB). 



$LOGB Macro Instruction Format 



AN 



Activates selected entries, selecting only those entries whose 
first N characters match the first N characters specified in 
the CHARS operand, where N is the number specified in 
the NUM operand. 



DM 



Deactivates selected entries, selecting only those entries 
whose characters exactly match the characters specified in 
the CHARS operand. 



[name] 


SLOGB 


NUM-decdig,LEN-decdig 



name 



A name given to a SLOGB macro instruction becomes the 
symbolic address of the first byte of the allocated Terminal 
Statistics Logging Area and can be specified in the ERR LOG 
operand of the appropriate SDTFB macro instruction. 
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NUM-decdig 



LEN— decdig 



Specifies in decimal the number of entries the Terminal 
Statistics Logging Area must contain. The value for NUM 
is calculated in one of two ways: 

1 . Polling and/or addressing, no clusters: 

NUM = number of terminals to be polled + 

[number of terminals to be addressed or 
number of terminals for which an online 
test may be requested (see index entry 
online test)] 

For example: 



S/3 



Specifies in decimal the number of polling/addressing char- 
acters used in a polling/addressing sequence for this 
program. The maximum number for each terminal is 7. 



Generate a Switched ID List ($SWIB) 

If your station is an autoanswer or manual answer station 
(TYPE-AA or TYPE-MA in $DTFB), you can use the 
$SWIB macro instruction to generate a switched ID list 
containing the station identification sequences that your 
station will accept. For the format of this list, see index 
entry switched ID list format. 

Each $SWIB macro instruction creates one entry in the 
switched ID list; each entry contains one sequence of sta- 
tion ID characters. $SWIB macro instructions must be cod- 
ed consecutively. 



Polled terminals = 4 
Addressed terminals = 4 

NUM = 8 



$SWIB Macro Instruction Format 



[name] 


$SWIB 


SELECT-hex,STATID-hex, 
LEN -decdig [,LAST-Y/N] 



2. Polling and/or addressing clusters: 

NUM = number of control units to be polled + 
number of devices to be polled + 
number of devices to be addressed 

For example: 




Control units polled = 3 
Devices polled = 8 
Devices addressed = 8 

NUM= 19 



name 

A name given to a $SWIB macro instruction becomes the 
symbolic address of the first byte of the switched ID entry 
generated. The name can then be used to addresis-the entry 
if you want to change the entry (for example, activate or 
deactivate an entry) by using the $$BCSW macro instruction. 



SELECT-hex 

Specifies two hexadecimal characters for selecting this entry 
in the switched ID list. Valid entry selection characters 
are X'OO' through X'EF'. 

When an entry in the switched ID list is compared to an 
identification sequence received from a remote terminal, 
MLMP places the entry selection characters in the BSC DTF 
at $BDRLN (see index entry BSC DTF for the format of 
the DTF). If you specify unique entry selection characters 
for each entry in a switched ID list, you can determine 
which identification sequence you accepted last by check- 
ing the contents of $BDRLN after a completion code has 
been posted on your last MLMP I/O request. 
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If you want to communicate with only one of several pos- 
sible terminals, move the entry selection characters asso- 
ciated with the terminal's expected identification sequence 
to the DTF before you issue the first GET request to that 
file. The entry selection characters you move must be dif- 
ferent from the previous entry selection characters in 
$BDRLN. 

If you move X'FO' to $BDRLN, all entries in the switched 
ID list are activated before the identification sequence re- 
ceived is inspected. Entries in the switched ID list are then 
compared to the ID received, beginning with the first entry 
in the list. If you move X'FT to $BDRLN, only those 
entries currently active in the switched ID list are used to 
inspect a received station ID. 

When an MLMP program specifying SWLIST-Y in $DTFB 
is assembled, $BDRLN is set to X'FT to indicate that any 
active identification sequence in the switched ID list is 
acceptable. 

For more information on how to change a switched ID list, 
see index entry $CHGB macro instruction. 



STATID-hex 

Specifies the hexadecimal representation of a station identi- 
fication sequence. The maximum number of characters is 
15. 



LEN-decdig 

Specifies, in decimal, the number of bytes represented in 
the STATID operand. The maximum number of bytes is 
15. 

If you are using a switched ID list but you are willing to 
establish a connection with a terminal that does not send an 
identification sequence, you must define in your list an 
entry with LEN-0 specified. (If an entry with length = 
zero is encountered in the list, a connection is established 
with the calling station whether a station ID was received 
or not. Consequently, if an entry with LEN-0 must be 
used, place the entry at the end of your list so you can 
check station IDs that are received.) 



LAST-Y/N 

Specifies whether this is the last entry in the switched ID 
list; Y if yes, N if no. LAST-Y causes a one-byte end-of- 
list indicator to be generated. If end-of-iist is encountered 
before an acceptable station identification sequence has 
been received, an invalid ID completion code ($BCBID) is 
posted (see index entry completion code). 

Change a Switched ID List ($BCSW) 

The $BCSW macro instruction enables you to activate and 
deactivate selected entries in a switched ID list created by 
the $SWIB macro instruction. For example, you can use 
SBCSW to: 

• Deactivate entries you have decided not to use. You 
may want to deactivate an entry to prevent communica- 
tion with a particular terminal, or to prevent communi- 
cation with a terminal that does not send an identifica- 
tion sequence (deactivate the entry with LEN-0 
specified). 

• Reactivate entries that have been deactivated. 

Note: $BCSW requires approximately 110 bytes of main 
storage plus the space required by the parameter list. Unless 
you have a large number of switched ID entries to change, 
you can activate and deactivate switched ID entries more 
efficiently yourself by changing the status byte in switched 
ID entries. See index entry switched ID list. 



$BCSW Macro Instruction Format 



[name] SBCSW [PARM- address 



PARM-address 

Specifies the symbolic address of a parameter list you pro- 
vide. The parameter list defines the changes you want to 
make to a switched ID list. For the format of the param- 
eter list, see index entry parameter list for changing a poll- 
ing list or a switched ID list. You can use the $CHGB 
macro instruction to generate the parameter list. See index 
entry SCHGB macro instruction. 



If the PARM operand is not specified, the address of the 
parameter list is assumed to be in register 1 . 

After SBCSW is executed, register 1 contains the address of 
the parameter list. 
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Generate a Translate Parameter List ($TRL) 

The $TRL macro instruction generates the parameter list 
required by the System/3 translate routine. Appendix C 
shows the format of the parameter list. 



$TRL Macro Instruction Format 



[name] 


$TRL 


TO-address,FROM-address, 
LEN-decdig,TRT-address 



A name given to a $TRL macro instruction becomes the 
symbolic address of the first byte in the generated para- 
meter list. The name can then be used to address specific 
fields in the list if you want to alter the fields. 



TO — address 

Specifies the symbolic address of the first byte of the area 
to which translated data will be moved. 



FROM -address 

Specifies the symbolic address of the first byte of the data 
field to be translated. This address can be the same as the 
address specified in the TO operand. 



LEN — decdig 

Specifies the decimal length of the FROM field. 



Generate a Translate Table ($TRTB) 

The $TRTB macro instruction generates an EBCDIC to 
ASCII or an ASCII to EBCDIC translate table. The table 
is generated in the format required by the $TRL macro in- 
struction (see index entry $TRL macro instruction), and 
can be addressed by $TRL when you translate data. 



$TRTB Macro Instruction Format 



[name] 


$TRTB 


[CODE-E/A] [,HEX-hex] 



name 



A name given to a $TRTB macro instruction becomes the 
symbolic address of the first byte of the generated translate 
table. 



CODE-E/A 

Specifies whether the character code of the data to be 
translated is EBCDIC (E) or ASCII (A). $TRTB generates a 
258-byte table if CODE-E is specified and a 130-byte table 
if CODE-A is specified. 

Note: If you specify CODE— A, you might want to code 
"DC 128XLVFF'" after the $TRTB macro instruction to 
allow for the occurrence of invalid ASCII characters. See 
index entry System/3 translate tables. 



TRT — address 

Specifies the symbolic address of the first byte of the trans- 
late table. 



24 



HEX-hex 

Specifies the hexadecimal pattern with which to replace any 
invalid characters found during translation. If the HEX 
operand is not specified, the replacement character is the 
substitute character - EBCDIC-3F, ASCI 1-1 A. 



System/3 Trans/ate Tables 

Trans/ate Tables Generated by $TRTB: Translate tables 
generated by the $TRTB macro instruction are generated in 
the following format: 



Byte Field Description 

Contains X'FF'. This is the hexadecimal 

value used in the translate table to identify 
characters that cannot be translated from 
EBCDIC to ASCII if CODE-E was specified 
in $TRTB or from ASCII to EBCDIC if 
CODE-A was specified. 



User-Defined Translate Tables: If you don't want to trans- 
late certain valid EBCDIC or ASCII characters (you might 
not want to translate BSC line control characters, for exam- 
ple), you can generate your own translate table. However, 
you must generate the table in the format described in the 
preceding paragraphs. 

Choose hexadecimal values for bytes and 1 of the table. 
Then, as you construct the rest of the table, substitute the 
value of byte for each character that cannot be translated 
and for each valid character that you choose not to translate. 

Generate an Interface to the Translate Routine ($TRAN) 

The $TRAN macro instruction generates linkage to the 
the System/3 translate routine. After issuing 
$TRAN, check the completion code in the translate para- 
meter list to determine whether or not invalid characters 
were found. See index entry translate parameter list for 
the format of the translate parameter list. 



Byte contents to be used in place of charac- 
ters that are not translated. 



2-n 



Actual translate table. 



The translate table, bytes 2-n, is constructed so that the 
hexadecimal value of a character to be translated can be 
used as a displacement (from byte 2) to locate the correct 
translation in the table. 

When the correct translation for a byte is located in the 
table, the translation is compared to byte 0. If the two 
bytes are the same: 

• The completion code in the translate parameter list 
(see index entry translate parameter list) is set to indi- 
cate that an invalid character was detected, and 

• The contents of byte 1 are substituted for the original 
character. 

If the translation of a character is not the same as the 
contents of byte 0, the hexadecimal value in the trans- 
late table is substituted for the original character. 
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$TRAN Macro Instruction Format 



06 



[name] 


$TRAN 


[TRL-address] 



TRL— address 



Transmit 36 alphameric characters, A-Z and 0-9, the 
number of times specified in the NUM operand. Trans- 
mit the characters in ASCII (ASCII adapter only). 



14 



Specifies the symbolic address of the translate parameter 
list. If not given, the address is assumed to be in register 1. 
After $TRAN is executed, register 1 contains the address 
of the translate parameter list. 



Transmit 36 alphameric characters, A-Z and 0-9, the 
number of times specified in the NUM operand. Trans- 
mit the characters in EBCDIC (EBCDIC adapter only). 



Generate an Online Test Parameter List ($RFTL) 

The $RFTL macro instruction generates the parameter list 
required for online test requests (see index entry online test 
requests). For the format of the parameter list, see index 
entry online test parameter list. 



$RFTL Macro Instruction Format 



[name] 


$RFTL 


TYPE-00/01/06/14,NUM-decdig, 
LEN-decdig [,CODE-E/A] 
[,TERMAD-hex] 



name 



A name given to a $RFTL macro instruction becomes the 
symbolic address of the first byte of the generated param- 
eter list. The name can then be used to address specific 
fields in the list if you want to change the fields. 



NUM— decdig 

Specifies, in decimal, the number of times to transmit or re- 
ceive the test message. Valid entries are 1-99 (leading 
zeroes must not be used). 



LEN— decdig 

Specifies, in decimal, the number of addressing characters 
(0-7). LEN must be for: 

• All non-multipoint lines (TYPE-PP,AC,MC,AA, or MA 
in $DTFB) 

• Multipoint control stations (TYPE-CS in $DTFB) 

• Multipoint tributary stations (TYPE-MP in $DTFB) 
requesting online test type 00. 

LEN must be greater than only for multipoint tributary 
stations (TYPE-MP in $DTFB) requesting some test type 
other than 00. 



TYPE- 



CODE-E/A 



Specifies, in decimal, the online test type: 
00 



Specifies whether the character code of your data is 
EBCDIC (E) or ASCII (A). The character code you use is 
determined by the transmission code feature of your BSCA. 



Receive and acknowledge the test message the number 
of times specified in the NUM operand. The formatted 
test request must not be more than 300 characters long. 
See index entry online test requests. 



01 



Transmit the test message the number of times specified 
in the NUM operand. The formatted test request must 
not be more than 300 characters long. See index ( entry 
online test requests. 



TERMAD-hex 

Specifies the hexadecimal representation of the addressing 
characters to be used, not more than 7 bytes. The number of 
bytes required to contain the addressing characters must be 
equal to the number specified in the LEN operand. 
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INITIATING DATA TRANSFER 

To initiate data transfer you must issue: 

• GET requests to receive data ($GETB macro instruc- 
tion), or 

• PUT requests to transmit data ($PUTB macro instruc- 
tion). 

All GET and PUT requests are executed in move mode. 
The first request causes MLMP to establish line connections 
according to the operands specified in the $DTFB macro 
instruction. An initial GET request can be canceled after 
it has been issued ($CANB macro instruction). 

You must check for the completion of every BSC I/O 
operation you initiate ($CHK macro instruction). That 
is, you must issue $CHK after every GET request, PUT re- 
quest, and request for online test (see index entry online 
test) before you issue another GET request for the same 
line, PUT request, or request for online test. You must 
also issue $CHK after each $CANB macro instruction. 

Move Mode 

Data is moved from the MLMP I/O buffers to your logical 
buffer on GET requests, and from your logical buffer to 
the MLMP I/O buffers on PUT requests. A single GET or 
PUT request does not necessarily result in the actual trans- 
mission of data over a telecommunications line. 

Records for conversational files (CONV-Y in the $DTFB 
macro instruction) are transmitted one at a time. Con- 
sequently, each GET or PUT request causes MLMP to re- 
ceive or transmit one record. 

For all nonconversational files, however, a GET request 
causes data to be transmitted from the remote terminal 
only if the GET request moves to your logical buffer the 
last record contained in an MLMP I/O buffer. After the 
GET request is executed, an I/O buffer is empty and avail- 
able to MLMP for receiving more data, and transmission 
from the remote terminal can continue. 

A PUT request for a nonconversational file causes data to 
be transmitted to the remote terminal only if the record to 
be moved to an MLMP I/O buffer cannot be contained in 
the current I/O buffer. 



Issue a GET Request ($GETB) 

The $GETB macro instruction instructs MLMP to move data 
from an MLMP I/O buffer to your logical buffer. Do not 
attempt to move data to or from your logical buffer after 
issuing a GET request until you have been posted a DTF 
completion code by the check routine. See index entry 
$CHK macro instruction. 



$GETB Macro Instruction Format 



[name] 



$GETB I [DTF-addressl [,REJECT-address] 
[,OPC-N/BLK] 



DTF— address 

Specifies the symbolic address of the DTF (file) for which 
the GET request is issued. If not given, the address of the 
DTF is assumed to be in register 2. 

After $GETB is executed, register 2 contains the address 
of the DTF for which the GET request was issued. 



REJECT-address 

Specifies the symbolic address of a user routine to receive 
control if the GET request cannot be accepted by MLMP. 
You must provide the routine. The routine should check 
the DTF completion code to determine why the GET re- 
quest was not accepted. See index entry completion code. 

If the REJECT operand is not specified, check for a DTF 
completion code of $BCREQ after each GET request to 
determine whether or not the request was accepted. See 
index entry completion code. 

You might want to print a message to signal rejected GET 
request. In most cases, a request is rejected because of a 
logic error in your program. Check your logic flow, para- 
meter lists, and DTF for errors. Consider using the $SNAP 
macro instruction to dump your program. See index entry 
$SNAP macro instruction. 
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OPC-N 



DTF-address 



Specifies normal blocking and deblocking; that is, data 
received will be stripped of control characters and moved to 
your logical buffer (addressed by the RCAD operand in 
$DTFB) one record at a time. 



OPC-BLK 



Specifies the symbolic address of the DTF (file) for which 
the PUT request is issued. If not given, the address of the 
DTF is assumed to be in register 2. 

After $PUTB is executed, register 2 contains the address of 
the DTF for which the PUT request was issued. 



Specifies that data received will be moved to logical buffer 
one block at a time. Each block of data moved will include 
line control characters. The length of the block moved 
will be placed by MLMP in $BDREL of the DTF. For the 
format of the DTF, see index entry BSC DTF. 

OPC-BLK is recommended for GET requests for conversa- 
tional files. See index entry conversational reply for the 
significance of OPC-BLK in GET requests for a conversa- 
tional file. OPC-BLK is also recommended for GET re- 
quests issued to receive variable length records that do not 
contain record separators. See index entry $DTFB con- 
siderations for more information on variable length records. 

Note: If you specify OPC-BLK, be sure your logical buffer 
(identified by the RCAD operand in the $DTFB macro 
instruction) is large enough to contain an entire block of 
data plus line control characters. For a description of the 
RCAD operand, see index entry $DTFB macro instruction. 



REJECT-address 

Specifies the symbolic address of a user routine to receive 
control if the PUT request cannot be accepted by MLMP. 
You must provide the routine. The routine should check 
the DTF completion code to determine why the PUT re- 
quest was not accepted. See index entry completion code. 

If the REJECT operand is not specified, check for a DTF 
completion code of $BCREQ after each PUT request to 
determine whether or not the request was accepted. See 
index entry completion code. 

You might want to print a message to signal a rejected 
PUT request. In most cases, a request is rejected because of 
a logic error in your program. Check your logic flow, para- 
meter lists, and DTF for errors. Consider using the $SNAP 
macro instruction to dump your program. See index entry 
$SNAP macro instruction. 



Issue a PUT Request ($PUTB) 

The $PUTB macro instruction instructs MLMP to move 
data from your logical buffer to an MLMP I/O buffer. Do 
not attempt to move data tfti or from your logical buffer 
after issuing a PUT request until you have been posted a 
DTF completion code by the check routine. See index entry 
$CHK macro instruction. 



$PUTB Macro Instruction Format 



[name] 


$PUTB 


[DTF-address] [,REJECT-address] 
[,OPC-N/EOB/EOF/EOW] 



OPC-N 

Specifies normal blocking and deblocking. That is, data 
will be moved from your logical buffer (addressed by the 
RCAD operand in $DTFB) to available I/O buffers one 
record at a time. 



OPC-EOB 

Specifies that in addition to performing normal blocking 
operations, MLMP must make the current record the last 
record in the current output buffer, thereby forcing an end- 
of-block condition. ETB (ETX for conversational files) 
is transmitted at the end of this record. 

See index entry conversational reply for the significance 
of OPC-EOB in PUT requests for conversational files. 
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OPC-EOF 

Specifies that MLMP transmit EOT to indicate end-of-file. 

Note: If you specify OPC-EOF in the first PUT request 
for a file, or in a PUT request that immediately follows a 
GET request for the same file, the PUT request will be re- 
jected and the $BCIGN completion code will be posted in 
the DTF. See index entry completion code. 

OPC-EOW 

Specifies that EOT will be sent after each record in response 
to ACK or WACK. Each transmission consists of only one 
record when OPC-EOW is specified. 

If OPC-EOW is specified in PUT requests for a System/3 
control station's files (TYPE-CS in the $DTFB macro 
instruction), tributary stations can process each record as 
it is received from the control station without delaying 
transmissions between the control station and other tribu- 
taries in the network. After EOT has been sent to a tribu- 
tary in response to ACK or WACK, other tributaries can 
be polled or addressed. The tributary that received EOT can 
also be polled or addressed again. 

For more efficient use of line time, OPC-EOW is recommen- 
ded when you transmit from a control station to a 2972/ 
2980 terminal. You must specify OPC-EOW if you are 
transmitting to a 3270 printer. However, EOT is not a 
valid response to WACK for every kind of terminal. Know 
the restrictions pertaining to the terminals you use before 
specifying OPC-EOW. 

Note: Don't specify OPC-EOW for a conversational file 
(CONV-Y in the $DTFB macro instruction) if you expect 
to receive a conversational reply. If you do specify OPC- 
EOW for a conversational file, conversational replies will 
be ignored and lost. 



Cancel a GET Request ($CANB) 

The $CANB macro instruction instructs MLMP to cancel 
a GET operation that is in progress. $CANB enables you to 
override wrapped polling lists if you are a control station 
(TYPE-CS in the $DTFB macro instruction) and cancel 
initial GET requests. 



Issue $CHK for each accepted cancel GET request. If the 
check routine posts the SBC EOT completion code, the 
GET request was canceled by $CANB. If any other com- 
pletion code is posted, it pertains to the GET request-$CANB 
has been ignored and you must proceed according to the 
completion code posted for the GET request. 

$CHK needn't be issued for a GET request before it is 
canceled. However, if you are polling with a wrapped poll- 
ing list or waiting to be addressed, a way to determine 
whether or not to cancel the GET request is: 



1. 



Check the GET request with RTN-Y specified in 
$CKL (see index entry $CKL macro instruction) . 

Look for the SBCCMP completion code (see index 
entry completion code). If $BCCMP is posted by 
the check routine and none of the DTFs in the 
checklist indicate completion yet, you might want 
to stop polling or waiting to be addressed. 



$CANB Macro Instruction Format 



[name] | $CANB | [DTF-addrewJ 



DTF— address 

Specifies the symbolic address of the DTF (file) for which 
the cancel request is issued. If not given, the address is 
assumed to be in register 2. 

After $CANB is executed, register 2 contains the address of 
the DTF for which the cancel GET request was issued. 



Check for I/O Completion ($CHK) 

The $CHK macro instruction generates linkage to a check 
routine. The check routine checks for I/O completion by 
examining the DTFs identified in the list created by the 
$CKL macro instruction. See index entries checklist and 
$CKL macro instruction for a description of the checklist 
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If an I/O operation is complete, the address of the comple- 
ted DTF is returned in register 2 after the completion code 
is posted in the DTF (see index entry completion code). 

• Model 10 and Model 12: If the REQ key on the 5471 
Printer Keyboard was pressed, and the related DTF 
appears in the checklist (REQK -Y or CONS- Y specified 
for the entry in the checklist), a completion code of 
X'50' is posted in the console DTF and the address of 
the DTF is returned in register 2. 

• Model 15: If the Program Function Key 9 (PF9) was 
pressed and the related dummy DTF appears in the check- 
list (REQK-Y specified for the entry in the checklist), 

a completion code of X'50' is posted in the dummy 
DTF and the address of the DTF is returned in register 2, 

Subsequent DTFs in the checklist are not tested if a com- 
pleted DTF or a console/PF9 request is found. 

To get completion codes posted in all DTFs in a list, con- 
tinue to issue $CHK. If the check routine finds a comple- 
ted BSC DTF with a $BCERR, $BCTIM, $BCDAT, $BCLOS, 
$BCCON, $BCRSP, or $BCADP completion code (see 
index entry completion code). MLMP logs the following 
message on the system logging device: 



BSCA LINE-0 or 2) 



CODE cc-(description) 



Completion code 
(■TERMINAL ADDRESS-(characters) 

Polling or addressing characters 
•—Printed for control stations only 



1 



If no I/O completion is found, the SBCCMP or $BCACD 
completion code is posted in the last DTF in the checklist 
and the address of the DTF is returned in register 2 if: 

• You specified RTN-Y in the $CKL macro instruction 
that created the first entry in the checklist ($BCCMP 
completion code), or 

• Each entry in the checklist is closed, inactive, or has 
the skip indicator on (SKIP-Y specified in $CKL,) 
($BCACD completion code). 



Model 10 and Model 12: Otherwise, the check routine does 
not return control, but issues a halt and waits for an interrupt. 
The halt displayed on the stick lights is [] . After a BSCA or 
MLTA interrupt, the [ ] halt is automatically reset and the 
check routine searches the checklist again from the begin- 
ning. The check routine does not automatically reset the 
[ ] halt after 5471 completions; you must manually reset 
the [ ] halt if you are currently using the printer keyboard. 

You must check for completion of all telecommunications 
I/O operations, including those controlled by MLTA. (For 
information regarding MLTA, see IBM System/3 Multiple 
Line Terminal Adapter RPQ Program Reference and Com- 
ponent Description Manual, GC21 -7560.) Issue $CHK for 
every accepted GET request ($GETB), PUT request 
($PUTB), and request for online test ($RFT) before issuing 
another $GETB, $PUTB, or $RFT for the same line. (For 
a description of online test, see index entry online test.) 

You must also issue $CHK after accepted cancel GET re- 
quests ($CANB). You can issue $CHK to check for com- 
pletion of printer-keyboard I/O and request operations. 
(Model 10 and Model 12) or PF9 key requests (Model 15). 

You can save time in your program by doing some pro- 
cessing, that is independent of a particular I/O request, 
before you check the request. When $CHK is then issued, 
the check routine will not have to wait so long for com- 
pletion to occur, and will return control to you sooner. 

Model 10 and Model 12 Note: If you want to use the printer 
keyboard REQ key for operator interaction and your program 
is running in a DPF (dual programming feature) system, allo- 
cate the REQ key to your program by link-editing the pro- 
gram as an inquiry invoking module (ATTR— INQ in th<! // 
OPTIONS statement). For more information on link edit- 
ing, see IBM System/3 Overlay Linkage Editor Reference 
Manual, GC21 -7561 . For information on DPF, see the 
appropriate components reference manual listed in the 
Preface. 



$CHK Macro Instruction Format 



(name] 


$CHK 


[CKL-address] 



CKL— address 



Specifies the symbolic address of the first byte of a check- 
list or group of checklist entries. If none is given, the 
address of the checklist or checklist entries is assumed to 
be in register 2. 
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Techniques for Initiating Data Transfer 

Poll (Control Stations) 

If your station is a control station (TYPE-CS in the 
$DTFB macro instruction), MLMP polls the tributary 
stations to receive data from them. To poll a tributary 
station: 

1. Issue a GET request ($GETB) for the receive file. 
When the request is accepted, MLMP will poll the 
first station in the polling list identified by the re- 
ceive file's DTF. MLMP continues to poll stations 
in the list until: 

• A station responds by sending data. 

• An active station fails to respond. 

• All stations are polled the number of times speci- 
fied in the LIMIT operand of the $DTFB macro 
instruction. 

• No active entries exist in the polling list. 

2. After issuing $GETB, determine whether the GET 
request was accepted (see index entry completion 
code). (If you specified REJECT-address in the 
$GETB macro instruction, you don't have to deter- 
mine whether the GET request was accepted. See 
index entry $GETB macro instruction. ) 

3. If the GET request was accepted by MLMP, issue 
a check request ($CHK). 

4. Continue according to the completion code posted. 
If the $BCDNE completion code (successful com- 
pletion) is posted, you can continue to receive data 
(issue $GETB) until the $BCEOT completion code 
(end-of-file received) is posted. Another GET re- 
quest then reinitiates polling; a PUT request ($PUTB) 
initiates addressing. 



Address (Control Stations) 

If your station is a control station (TYPE-CS in the $DTFB 
macro instruction), MLMP addresses a tributary station 
to transmit data to it. To address a tributary station: 

1. Issue a PUT request ($PUTB) for the transmit file. 
When the request is accepted, MLMP will address 
the station in the addressing list identified by the 
transmit file's DTF. 

2. After issuing $PUTB, determine whether the PUT 
request was accepted (see index entry completion 
code). (If you specified REJECT-address in the 
$PUTB macro instruction, you don't have to deter- 
mine whether the PUT request was accepted. See 
index entry $PUTB macro instruction. ) 

3. If the PUT request is accepted by MLMP, issue a 
check request ($CHK). 

4. Continue according to the completion code posted. 

If the completion code is $BCNEG, you may have 
received a reverse interrupt request (RVI) from the 
addressed terminal. Check RVIADR (specified in 
the $DTFB macro instruction) to determine whether 
or not you received an RVI whenever the $BCNEG 
completion code is posted to an addressing attempt. 
If you did receive an RVI from the addressed ter- 
minal, poll the terminal (see index entry poll). 
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Addressing Considerations: If files for the tributaries in 
a network are the same in terms of record length, block 
length, line code, conversational mode, ITB checking, and 
transparency, you need only one DTF to address all the 
tributary stations in the network. Using only one DTF, you 
can address the tributaries in either of the following two 
ways. (Though completion codes are not discussed in the 
following procedures, check for completion as always.) 

1. Use several addressing entries: 

a. Create an addressing entry for each tributary you 
want to address (see index entry $POLB macro 
instruction). 

b. Specify in the LIST AD operand of the $DTFB 
macro instruction the location of the first address- 
ing entry you want to use. 

c. Issue a PUT request ($PUTB). 

d. Issue a PUT request with OPC-EOF specified 
(see index entry $PUTB macro instruction) when 
you are done transmitting to the tributary. 

e. Change field $BDLST in your DTF (see index 
entry BSC DTF for the format of the DTF) to 
point to the next addressing entry you want to 



use. 






Repeat steps (c) through (e) until you have 
finished transmitting. 

Use only one addressing entry: 

a. Create an addressing entry for the first tributary 
you want to address (see index entry $POLB 
macro instruction). 

b. Specify in the LISTAD operand of the $DTFB 
macro instruction the location of the addressing 
entry. 

c. Issue a PUT request ($PUTB). 

d. Issue a PUT request with OPC-EOF specified 
(see index entry $PUTB macro instruction) when 
you are done transmitting to the tributary. 

e. Move the next tributary's addressing characters 
into the third field of the existing addressing entry 
(see index entry polling/addressing list for the 
format of addressing entries). 



Respond to Polling or Addressing (Tributary Stations) 

A tributary station (TYPE-MP in the $DTFB macro in- 
struction) monitors a multipoint line for polling or address- 
ing characters only when the tributary is in control mode. 
MLMP establishes control mode by performing a receive- 
initial (RCVI) operation. The receive-initial operation is 
performed when the tributary issues the first PUT ($PUTB) 
or GET ($GETB) request. If the tributary then receives 
its polling or addressing characters, the tributary enters 
text mode and data transmission to or from the control 
station can proceed. 

To monitor the line for polling characters, issue a PUT 
request. If the $BCDNE completion code is posted after 
an accepted PUT request, you have transmitted data to 
the control station. 

To monitor the line for addressing characters, issue a GET 
request. If the $BCDNE completion code is posted after 
an accepted GET request, you have received data from the 
control station. 

To re-enter control mode after transmitting or receiving 
end-of-file (EOT), issue a PUT or GET request. (Control 
mode is re-established automatically if you specified 
AUTORS-Y in your $DTFB macro instructions. See index 
entry $DTFB macro instruction.) 

Note: A System/3 tributary station is committed at any 
particular time to monitoring either for polling or for 
addressing characters. If you are looking for one kind 
and the control station is transmitting the other, data 
transmission between you and the control station will not 
occur; you will be posted the $BCNCN completion code 
(see index entry completion code). 









Repeat steps (c) through (e) until you have finished 
transmitting. 
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Receive Only 

Issue GET requests ($GETB) for the receive file until the 
$BCEOT completion code is posted in the DTF (after 
$CHK is issued). $BCEOT indicates that you have received 
end-of-file (EOT) from the remote terminal. See index 
entry terminating data transferror MLMP end-of-job in- 
formation. 



Transmit Only 

Issue PUT requests ($PUTB)-for the transmit file until the 
entire file has been transmitted, then send end-of-file (EOT). 
End-of-file can be sent by specifying OPC-EOF in a PUT 
request (see index entry $PUTB macro instruction), by 
issuing a request for a different file, or by closing ($CLOS) 
the file. See index entry terminating data transferror 
MLMP end-of-job information. 



Conversational Reply 

If you want to transmit or receive conversational replies, 
you should be aware of the BSC line conventions pertain- 
ing to the use of the ETB, ETX, and EOT line control char- 
acters. The following discussion describes the conventions 
as they relate to conversational replies. Whenever a BSC pro- 
gram violates the conventions described, the effect upon 
the program may not be predictable. 



By convention, you cannot send a conversational reply in 
response to a message ending with ETB. If you are trans- 
mitting to a terminal that may want to send a conversation- 
al reply back to you and you are ready to accept a conver- 
sational reply, you must notify the terminal that you will 
accept a conversational reply by transmitting a message 
ending with ETX. Since line procedure requires that at 
least two messages be sent from one terminal before the 
other terminal can respond with a conversational reply, you 
must transmit a message ending with ETX in one of two 
ways: 

• If you are transmitting two or more consecutive mes- 
sages to the remote terminal, specify OPC-EOB in 
the last PUT request issued. 

• If you are transmitting only one data message to the 
remote terminal, follow the message with a null mes- 
sage. A null message is STX ETX, and is transmitted 
by changing $BDREL in the DTF to zero, then issuing 

a PUT request for which OPC-EOB is specified. Before 
transmitting a null message, however, be sure the re- 
mote terminal can accept null messages. (If a null mes- 
sage is received, the $BCNDT completion code is posted. 
See index entry completion code.) 

Once you have transmitted a message from a conversational 
file, even if it was a null message, you must wait for the 
$BCCRP completion code to be posted before you can issue 
a GET request for the file (see index entry completion 
code). 



Transmitting from a Conversational File: When you trans- 
mit from a conversational file (CONV-Y in the $DTFB 
macro instruction), each PUT request for which OPC-N 
is specified causes transmission of one record in the follow- 
ing format: 



Note: If you are going to transmit from a conversational 
file after you have received records for the file, reset 
SBDREL if the record length you want to transmit is dif- 
ferent from the record length you've been receiving. 



D 


S 




E 


L 


T 


Text 


T 


E 


X 
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1 

Transparency Only 



PUT requests for which OPC-EOB is specified causes 
transmission of records in this format: 



D 


S 




E 


L 


T 


Text 


T 


E 


X 




X 



1 

Transparency Only 



Receiving to a Conversational File: If you are receiving 
messages to a conversational file (CONV-Y in the $DTFB 
macro instruction) and you want to transmit a conversa- 
tional reply, you can determine whether this remote ter- 
minal will accept a conversational reply by looking for a 
message ending with ETX. By specifying OPC-BLK in 
the GET requests for a conversational file, you can have 
a message plus its control characters moved from the BSC 
I/O buffers to your logical buffer (addressed by the RCAD 
operand in $DTFB). That is, messages received will be 
moved to your logical buffer in the following format: 



s 




E E 


T 


Text (if any) 


T or T 


X 




B X 
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Since the length of the message received is in $BDREL of 
the DTF, you can use $BDREL to locate the last character 
received to determine whether it was ETB or ETX. If the 
message ended with ETB, you cannot send a conversational 
reply; you can send a conversational reply if the message 
ended with ETX. 



Closing a Conversational File: After all messages for a 
conversational file have been sent and received, the terminal 
that sent the last message, even if it were a null message, 
must also send EOT. EOT can be sent by specifying OPC- 
EOF in a PUT request (see index entry $PUTB macro 
instruction), by issuing a request for a different file, or by 
closing ($CLOS) the file. See index entry terminating data 
transferror MLMP end-of-job information. 

Always send EOT immediately after transmitting the last 
message for a file. If the terminal receiving the last mes- 
sage should transmit EOT before you do, your conversa- 
tional file will be terminated with a permanent error posted 
in the DTF ($BCERR completion code). 



Summary: 

• If you are transmitting from a conversational file, notify 
the remote terminal that you will accept a conversation- 
al reply by: (1) specifying OPC-EOB in your last PUT 
request if you are sending two or more consecutive 
messages, or (2) transmitting a null message. 

• If you are receiving messages to a conversational file, 
specify OPC-BLK in your GET requests and look for 
ETX at the end of messages received to determine when 
you can send a conversational reply. 

• If all messages for your conversational file have been 
sent and received and you sent the last message, trans- 
mit EOT. 

The two flowcharts that follow outline the techniques for 
transmit-with-reception-of-conversational-reply and receive- 
with-transmittal-of -conversational-reply. 
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Transmit with Reception of Conversational Reply: The 
GET and PUT requests shown are issued for the same file. 
See index entry completion code for a definition of the 
codes appearing in the following flowchart. 



<D 



Issue $PUTB to transmit 
a message. Issue $CHK 
to check for I/O 
completion. 




Issue $PUTB to transmit 
ETX (OPC-EOB). Issue 
$CHK to check for I/O 
completion. 




Respond to 
unsuccessful 
PUT request. 



Issue $GETB (OPC-BLK) 
to receive data. Issue 
$CHK to check for I/O 
completion. 



Note: MLMP does not block and deblock data for a file 
when you specify that the file can receive conversational 
replies. 




Respond to 
unsuccessful 
GET request. 



End-oMRIe 
received. 
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Receive with Transmittal of Conversational Reply: The 
GET and PUT requests shown are issued for the same file. 
See index entry completion code for a definition of the 
codes appearing in the following flowchart. 



Respond to 
unsuccessful 
GET request. 




Note: MLMP does not block and deblock 
data for a file when you specify that the 
file can transmit or receive conversational 
replies. 



Respond to 
unsuccessful 
PUT request. 
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Receive Interspersed with Transmit 

Receive-interspersed-with-transmit differs from receive- 
with-transmittal-of-conversational-reply in two ways: 

• One DTF is required to receive data; another is required 
to transmit data. 

• Reverse interrupt (RVI) request is used. 



G> 



The following chart outlines the technique for receive- 
interspersed-with-transmit. See index entry completion 
code for a definition of the codes appearing in the follow- 
ing flowchart. 






Issue $GETB to receive 
data. Issue $CHK to 
check for I/O completion. 




Respond to unsuccessful 
GET request. 






Set on RVIMSK 
(You must not set 
RVIMSK on before the 
initial GET request.) 




■*" End-of-file received. 






Issue $GETB to continue 
to receive data. Issue 
$CHK to check for I/O 
completion. 





N Respond to 
unsuccessful 
GET request. 



Set off RVIMSK. 






Note: Use this technique as many times as necessary to 
process the files in your program. Consider, however, that 
the reverse interrupt request is required only when the proc- 
essing of a file must be interrupted. For example, if a 
receive-only file were completely processed before you 
wanted to transmit, the reverse interrupt request would not 
be needed. 



. 



Issue $PUTB to transmit 
data. Issue $CHK to check 
for I/O completion. 



_ . . ^^^ m„ Respond to 
Completion ^-v. No M 

. *Dor-.mr: S> *" Unsuccessful 

code = $BCDNE ^s^ _,_. 

PUT request. 
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Transmit Interspersed with Receive 

Transmit-interspersed-with-receive differs from transmit- 
with-reception-of-conversational-reply in two ways: 

• One DTF is required to transmit data; another is required 
to receive data. 

• Reverse interrupt request (RVI) is used. 

The following chart outlines the technique for transmit- 
interspersed-with-receive. See index entry completion 
code for a definition of codes appearing in the following 
flowchart. 



G> 



Issue $PUTB to transmit 
data. Issue $CHK to 
check for I/O completion. 




No . Respond to unsuccessful 
PUT request. 



Setoff RVIMSK. 



Issue $GETB to receive 
data. Issue $CHK to 
check for I/O completion. 




No Respond to unsuccessful 
GET request. 



Note: Use this technique as many times as necessary to 
process the files in your program. 
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TERMINATING DATA TRANSFER 

Data transfer is terminated by: 

• Terminating BSC files. 

• Closing BSC files ($CLOS macro instruction). 



Close BSC Files ($CLOS) 

At the end of your MLMP program, you should close all 
files. The $CLOS macro instruction generates code that 
effects a branch to a system close routine. The system 
close routine then cioses the DTFs identified in the $CLOS 
macro instruction. 



Terminate BSC Files 

Receive Files (FTYP-RCV) 

Non-conversational receive files are terminated when an 
end-of-fiie indication (EOT) is received for the file ($BCEOT 
completion code posted). For information about termin- 
ating conversational files (CONV-Y in the $DTFB macro 
instruction), see index entry closing a conversational file. 

Transmit Files (FTYP-TSM) 
Transmit files are terminated by: 

• A $CLOS macro instruction. 

• A $PUTB macro instruction that specifies end-of-file 
(OPC-EOF). 

• A GET request ($GETB), PUT request ($PUTB), or on- 
line test request ($RFT) for another DTF defined for 
the same telecommunications line. 

When you issue a GET, PUT, or online test request for 
another DTF defined for the line, MLMP terminates the 
previous transmit file by transmitting any data remaining 
in the output buffers, then transmitting an end-of-file 
indication before accepting the new request. 



$CLOS Macro Instruction Format 



[name] ]"$CLOS | [DTF-address] 



If you specify the keyword DTF, enter, as the parameter, 
the name of the DTF (file) you want to close. If the op- 
erand is not given, the address of the DTF is assumed to 
be in register 2. 

If the DTF specified is in a chain, ail DTFs following in the 
chain will be closed by this request. (MLTA DTFs must 
not be in the chain. For information regarding MLTA, see 
IBM System/3 Multiple Line Terminal Adapter RPQ Pro- 
gram Reference and Component Description Manual, 
GC21 7560.) 

After $CLOS is executed, register 2 contains the address 
of the last DTF closed by the macro instruction. 



Considerations for Closing Files 

• To ensure that all data is transmitted and/or received 
satisfactorily, check ($CHK) for the completion of any 
outstanding I/O requests before you close the associated 
files. 

• If you have established connection on a switched line 
with one terminal and want to use the line to communi- 
cate with a different terminal, you must close the file 
for the first terminal before you can establish connect- 
ion with the second terminal. (When you close a file 
for a switched line, MLMP transmits DISC and disables 
the line.) 

• If you reopen a BSC file that has been closed, record 
length, block length, and all other file attributes are 
the same as they were when the file was closed. 



MLMP Programming 39 



40 



Chapter 4. Diagnostics and Diagnostic Aids 



MLMP diagnoses many of the errors possible in writing 
macro instructions and in program execution. These 
errors are recorded in mnotes, halts, BSC DTF completion 
codes, and the BSC counters. 

Also provided with MLMP are aids to help you isolate 
undetermined programming problems. The diagnostic 
aids provided are the online test, a trace module, and a 
dump routine. 



Mnotes 

Mnotes are error codes and messages pertaining to macro 
instruction formats (Figure 5). Mnotes are included in 
your assembly listing, printed beneath the macro instruction 
to which the mnotes apply. 



MLMP Mnote Format 

Column 

1 or 2 

ISCbiBSSEEtimessagetSM. 



Column 59 



■*MNOTE*" 



SC- Severity code; 04 or 08. Mnotes with a severity code 
of 04 are warnings, and are preceded by an asterisk 
(*) in column 1. Mnotes with a severity code of 08 
are terminal and generate assembly errors. 

B— Indicates that this mnote applies to MLMP. 

SS- System message code; 00, 10, 20, 30, 40, or 50. 

00— Signals miscellaneous errors not covered in the 
following five categories. 

10-MISSING REQUIRED OPERAND. This oper- 
and is always required, or is required by another 
operand that is specified. 

20-CONFLICTING OPERAND(S). This operand 
conflicts with another. 

30-INVALID PARAMETER IN OPERAND. This 
parameter is not valid in this operand. 

40-CONFLICTING PARAMETER(S). This para- 
meter, as coded to the listed operand(s), conflicts 
with a parameter in another operand. 

50-MISSING OPERAND. This operand is not 
always required, but may be required in this 
instance. 



Note: If you get an mnote with a system message 
other than 00, 10, 20, 30, 40, or 50, contact your 
local IBM representative. 

EE— Explanation code. Explanation codes; identify 
specific operands and parameters. 
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Related 


Mnote 


Macro 


Number 


Instruction 


B0001 


$DTFB 


B0002 


$DTFB 


B0003 


$DTFB 


B1001 


$POLB 


B1002 


$POLB 


B1003 


$POLB 


B1004 


$DTFB 


B1005 


$DTFB 


B1006 


$DTFB 


B1007 


$DTFB 


B1008 


$DTFB 


B1009 


$DTFB 


B1010 


$DTFB 


B1011 


$DTFB 


B1012 


$DTFB 


B1013 


$DTFB 


B1014 


$DTFB 


B1015 


$DTFB 


B1016 


$DTFB 


B1017 


$DTFB 


B1018 


$CHGB 


B1019 


$CHGB 


B1020 


$CHGB 


B1021 


$CHGB 


B1023 


$LOGB 



Explanation 

Station IDs are recommended for switched lines. 

If BUFST is specified, the BUFNO operand is ignored. 

If CONV-Y is specified, the parameter specified in the BUFNO operand should be 1. 

The ID operand is required. 

The LEN operand is required. 

The TERMAD operand is required. 

The RCAD operand is required. 

If TYPE-AC is specified, the DIAL operand is required. 

If TYPE-MC is specified, the TERMAD operand is required. 

If TYPE-CS is specified, the LISTAD operand is required. 

If TYPE-AC is specified, the Dl ALCT operand is required. 

If RCVID is specified, the RCVCT operand is required. 

If RCVCT is specified, the RCVID operand is required. 

If SNDID is specified, the SNDCT operand is required. 

If SNDCT is specified, the SNDID operand is required. 

The RECL operand is required. 

The BLKL operand is required. 

The BUFST operand is required. 

The BUFEND operand is required. 

If TYPE— CS is specified, the ERR LOG operand is required. 

The TYPE operand is required. 

The DTF operand is required. 

The NUM operand is required. 

The CHARS operand is required. 

The NUM operand is required. 



Figure S (Part 1 of 3). Explanations for BSC Mnotes 
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Mnote 
Number 

B1024 
B1025 
B1026 
B1027 
B1028 
B1029 
B1030 
B2001 
B2002 

B2003 
B2004 
B2005 
B2006 

B2007 

B2008 

B2009 

B2010 



Related 

Macro 

Instruction 

$LOGB 

$RFTL 

$RFTL 

$RFTL 

$SWIB 

$SWIB 

$SWIB 

$DTFB 

$DTFB 

$DTFB 
$DTFB 
$DTFB 
$DTFB 

$DTFB 

$DTFB 

$DTFB 

$DTFB 



B2011 


$DTFB 


B2012 


$DTFB 


B2013 


$RFTL 


B3001 


$POLB 



Explanation 

The LEN operand is required. 

The TYPE operand is required 

The LEN operand is required. 

The TERMAD operand is required. 

The SELECT operand is required. 

The LEN operand is required. 

The ST ATI D operand is required. 

If TYPE- AC is not specified, the DIAL operand is invalid. 

If TYPE-MP is not specified, the TERMAD operand is in- 
valid. 

If TYPE— CS is not specified, the LISTAD operand is invalid. 

If TYPE— AC is not specified, the Dl ALCT operand is invalid. 

If TYPE-AC, MC, AA, or MA is not specified, the RCVID is invalid. 

If TYPE-AC, MC, AA, or MA is not specified, the RCVID 
and RCVCT operands are invalid. 

If TYPE-AC, MC, AA, or MA is not specified, the SNDID 
and SNDCT operands are invalid. 

If TYPE-AC, MC, AA, or MA is not specified, the SNDCT 
operand is invalid. 

If RVIADR is specified, the RVIMSK operand is required. 
If RVIMSK is specified, the RVIADR operand is required. 

If TYPE-AA or TYPE-MA is not specified, the SWLIST operand 
is invalid. 

If TYPE-MP is not specified, the AUTORS operand is invalid. 

If TYPE-CS is not specified, the POLRES operand is invalid. 

If LEN-0 is specified, the TERMAD operand is invalid and is ignored. 

The parameter specified in the ID operand must be less 
than X'FO'. 



B3002 



$POLB 



The parameter specified in the LEN operand must not be 
greater than 7. 
Figure 5 (Part 2 of 3). Explanations for BSC Mnote* 
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Mnote 
Number 

B3003 
B3004 

B3005 

B3006 

B3007 

B3008 
B3009 
B3010 
B3011 
B3012 
B3013 

B4001 
B4002 

B4003 
B4004 
B4005 

B4006 
B5001 
B5002 



Related 

Macro 

Instruction 

$POLB 

$DTFB 

$DTFB 

$DTFB 

$RFTL 

$RFTL 

$RFTL 

$SWIB 

$SWIB 

$SWIB 

$TRTB 

$DTFB 
$DTFB 

$DTFB 
$DTFB 
$DTFB 

$DTFB 

$RFT 

$RFT 



Explanation 

OPEN or WRAP must be specified in the LAST operand. 

The parameter specified in the DIALCT operand must not 
be greater than 12. 

The parameter specified in the RCVCT operand must not 
be greater than 15. 

The parameter specified in the SNDCT operand must not 
be greater than 15. 

The parameter specified in the NUM operand must be greater than 
and less than 100. 

The parameter specified in the LEN operand must not be greater than 7. 

The parameter specified in the TYPE operand is invalid. 

The parameter specified in the LEN operand must not be greater than 15. 

The parameter specified in the SELECT operand must be less than F0. 

The parameter specified in the LAST operand is invalid. 

The parameter specified in the CODE operand is invalid. 

The parameter specified with BLKL must be greater than or 
equal to the parameter specified with RECL. 

If CONV-Y is specified, the parameter specified with BLKL 
must be equal to the parameter specified with RECL. 

If CONV-Y is specified, ITB-Y is invalid. 

If CODE-A is specified, TRANSP-Y is invalid. 

If SPAN-Y is specified for a receive file, the RECSEP 
operand is required. 

If neither BUFST and BUFEND nor BUFNO is specified, a default of 
BUFNO-1 is used. 

If online terminal test type 00 or 01 is requested, the LEN 
operand is required. 

If online terminal test type 00 or 01 is requested, the FROM 
operand is required. 



Figure 5 (Part 3 of 3). Explanations for BSC Mnotes 
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Halts 

Figure 6 shows halts issued by MLMP that require an 
operator response. For correct responses to the halts 
shown in Figure 6, see the appropriate halt/messages 
manual listed in the Preface. 

On the Model 10 and Model 12, MLMP also issues the 
halt [ ] . However, this halt does not usually require a 
response, but indicates the check routine is waiting for 
an interrupt. See index entry check for I/O completion 
($CHK) for more information regarding [ ] and the 
check routine. 



Display 


Meaning 


P9 
Y6 

Y7 
Y8 


Error in running FDP/Convert 

Error in: 

• Logging the control station terminal 
statistics 

• Opening a BSC file when: 

1 . Buffer area is not large enough 

2. Record length - 

• Attempting to initialize MLTERFIL 
on a disk file other than F1 

• (Model 10 and Model 12) Attempting 
to use line 2 in an RPG II telecommuni- 
cations program that was compiled on a 
system having only one BSC line. 

• DA microcode module cannot be 
found 

• DA microcode cannot be loaded 
correctly into adapter 

Perform a manual call 

Perform a manual answer 







Completion Codes 

MLMP monitors every receive and transmit operation. 
MLMP indicates the status of each operation by posting a 
completion code in the associated DTF at $BDCMP (see 
index entry BSC DTF for the format of the BSC DTF). 
If an error occurs during polling or addressing, MLMP 
will retry the operation three times before posting a com- 
pletion code; the error recovery retry count for other 
transmit and receive operations is seven (unless you specified 
some other retry count in the ERRCT operand of $DTFB 
—see index entry SDTFB macro instruction). 

The completion codes and the action you should take in 
response to them follow. The codes are 'divided into two 
groups: those posted after an I/O request ($GETB, $CANB, 
$PUTB, or $RFT) and those posted after a check request 
($CHK). 



Figure 6. MLMP Halts that Require an Operator Response 
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I/O Request Completion Codes 

Label Value Description 

$BCREQ X'OO' 
$BCUER X'41' 



$BCOLT X'48' 



$BCIGN X'4A' 



$BCCAL X'4D' 



The request is being processed. Check for I/O completion ($CHK). 



You made an error in your last request. Issue the request again, or issue a request for another 
file. 

The error you made was one of the following: 

• You did not open the file ($OPEN) before issuing the request. 

• You issued an initial GET request ($GETB) for a PUT file (FTYP-TSM in $DTFB), or a 
initial PUT request ($PUTB) for a GET file (FTYP-RCV in $DTFB). 

The request for an online test ($RFT) is invalid. Issue a valid request or close the MLMP 
files ($CLOS). 

The online test request was invalid for one of the following reasons: 

• You did not open the file ($OPEN) before issuing the request. 

• You issued an I/O request for the file before you issued $RFT for the file. 

• You issued $RFT for a GET file (FTYP-RCV in $DTFB). 

• The record length specified for the file (RECL operand in $DTFB) is greater than the 
block length specified for the file (BLKL operand in $DTFB). 

• The message length specified in $RFT is zero (LEN operand). 
Your last request was ignored because: 

• The previous operation was not complete, 

• You issued $PUTB, OPC-EOF as the first request for a file, or as the first request after 
issuing $GETB for the same file, or 

• You issued $CANB to cancel an operation that was not an initial GET. 

Check for completion of the previous operation ($CHK), or issue a different request for this 
file. 

You issued one of the following invalid requests: 

• A request for a new file before a previous receive file reached end-of-f ile. 

• A PUT request after a conversational reply was received. 

• A GET request for a conversational transmit file (FTYP-TSM, CONV-Y in $DTFB) before 
$BCCRP was posted. 

Issue a GET request for the active receive file, a PUT request for the conversational transmit 
file or close the MLMP files ($CLOS). 
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Check Completion Codes 

Label Value 

$BCDNE X'40' 



$BCEOT X'42' 
$BCBID X'43' 



$BCNEG X'44' 



$BCNON X'45' 



Description 

The requested operation has been completed successfully. If the request was a GET request for 
a nonconversational file, data has been moved from an MLMP I/O buffer to your logical buffer. 
If the request was a PUT request for a nonconversational file, data has been moved from your 
logical buffer to an MLMP I/O buffer. If the request was a GET or PUT request for a conversa- 
tional file (CONV-Y in $DTFB), data has been received or transmitted as well as moved be- 
tween the MLMP I/O buffers and your logical buffer. 

If the request was for an online test ($RFT), the test has been completed. 

Issue the next request, or examine the logged results of the online test (see index entry online 
test). 

Note: Logged online test results are available only to the operator, not the MLMP program. 

End-of-file has been received, or $GETB was cancelled ($CANB). Issue another request, or 
close the MLMP files ($CLOS). 

Switched line: Invalid ID exchange. Either your ID or the remote station's ID is invalid. 
Issue a request for another file or close the MLMP files ($CLOS). 

Multipoint line: The ID requested in the DTF is not in the associated polling list You can: 

• Poll or address a different station. 

• Reinstate polling from the beginning of the list (move X'FO' or X'FT to $BDINDj. 

• Issue a request for another file. 

• Close the MLMP files ($CLOS). 

All active stations in the polling or addressing list responded negatively. You can: 

• Poll or address a different station (reactivate an entry). See index entry change a polling 
($BCPL). 

• Issue a request for another file. 

• Close the MLMP files ($CLOS). 

Note: $BCNEG also is used to indicate that you received an RVI in response to an addressing 
attempt. Whenever $BCNEG is posted after you try to address a terminal, check RVIADR 
(specified in $DTFB) to determine whether you received an RVI. See index entry reverse 
interruption information regarding RVIs. 

The station whose $POLB ID is in $BDIND did not respond to polling or addressing. You can: 

• Poll or address a different station. 

• Issue a request for another file. 

• Close the MLMP files ($CLOS). 

• Deactivate the polling entry. 
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Value 
$BCCRP XW 

$BCNDT X'47' 
$BCOLT X'48' 









$BCNAC X'49' 






$BCASC X'4B' 



$ECNCN X'4C 
$BCLST X'4E' 

$BCERR X'4F' 



Description 

■ ■ ■ . . . ■ 

A record has been received from the remote station and is available in an MLMP I/O buffer 
(conversational reply pending). Issue a GET request for this file. 

No data is available for this conversational GET request (a null message was received). 

An error has occurred in executing a request for online test ($RFT), or an online test request 
you received was not followed by EOT. Check the format of your request {see index entry 
online test) if you just requested an online test. Use the trace module ($$BSTT) if problems 
persist (see index entry trace). 

None of the entries in the polling list is active. You can: 

• Activate an entry and poll a specific terminal. 

® Activate all entries in the list and reinitiate polling from the beginning of the list. 



• Issue a request for another file. 
® Close the MLMP files ($CLOS). 



, 



An invalid ASCII character exists in the data. Close this file ($CLOS) and issue a request for 
another file, or close all MLMP files. 

Note: If you are transmitting or receiving ASCII data on a switched line, be sure all station 
IDs have been given in ASCII. If you are a control station transmitting or receiving ASCII 
data, be sure polling and addressing characters have been given in ASCII. 

MLMP has been unable to establish a connection with the remote station. Issue your last 
request again, issue a request for another file, or continue with other processing. Otherwise, 
close the MLMP files ($CLOS). 

You did not send or receive a block of data within the time specified in the active DTF. 
(specified in the DLYCT operand of $DTFB). Issue a request for this or another file, or close 
the MLMP files ($CLOS). 

MLMP encountered a permanent error condition. Some permanent errors are: 

• EOT received in response to data transmitted. 

• EOT received in response to an addressing attempt. 

■ 



Forward abort received. That is: 



Received 
Transmitted 



TTD V ( EOT or DISC 

\ I 

\ i 
NAK 



■ 






EOT or DISC is transmitted after an error recovery retry count has been exceeded. 
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Label Value 

$BCTIM X'50' 



$BCDAT X'5V 
$BCLOS X'52' 



$BCCON X'53' 



$BCRSP X'54' 



$BCADP X'55' 



$BCCMP X'56' 



$BCACD X'57' 



$BCRLE X'58' 



Description 

The remote station does not respond to attempted data transfer. Issue a request for this or 
another file, or close the MLMP files ($CLOS). 

Note: X'5G" posted in a console DTF indicates that the operator pressed the REQ key (Model 10 
and Model 12). X'50' posted in a dummy DTF indicates that the operator pressed i:he PF9 key 
(Model 15). 

Data was received incorrectly (data check). Issue your last request again, or issue a request 
for another file. Otherwise, close the MLMP files ($CLOS). 

Data received was lost because it exceeded the size of the input buffer, had no ending control 
character, or because no record separator was found within two contiguous blocks of-spanned 
records. Issue your last request again, or issue a request to another station. Otherwise, close 
the MLMP files ($CLOS). 

The switched line connection with the remote station has been lost, or DISC was received in 
response to text. Issue your last request again, or issue a request for another file or station. Other- 
wise, close the MLMP files ($CLOS). 

An invalid response was received from the remote station. Issue your last request again, or 
issue a request to another station. Otherwise, close the MLMP files ($CLOS). 

The BSCA is not working correctly (adapter check). Issue your last request again, or issue a 
request for another file. Otherwise, close the MLMP files ($CLOS). 

Note: The BSC line is disabled if: 

• The connection was lost ($BCCON completion code condition), 

• DISC was received ($BCCON completion code condition), or 

• Normal end of file was received ($BCEOT completion code condition). 

None of the DTFs in the checklist indicates completion, but you have regained control as you 
requested in the first $CKL macro instruction (RTN-Y). See index entry $CKL macro instruc- 
tion. 

$BCCMP is posted in the last DTF in the checklist. 

All the DTFs in the checklist are inactive or have been exempted from the test for completion. 

$BCACD is posted in the last DTF in the checklist. 

The record received was larger than the specified maximum record length (RECL in $DTFB). 



Note: This completion code applies only if you are receiving spanned records separated by 
record separators. 
Note: All data in the MLMP I/O buffers at the time one of the following completion codes is posted may be lost: 



$BCASC 
$BCLST 
$BCERR 



$BCTIM 

$BCDAT 

$BCLOS 



$BCCON 
$BCRSP 
$BCADP 



$BCRLE 



The amount of data in the MLMP I/O buffers at any given time depends on record length, block size, buffer size, 
and the number of buffers you are using, as well as the number of I/O requests you have issued. See index entry 
move mode. 
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BSC Counters 

MLMP compiles the following statistics as it monitors re- 
ceive and transmit operations: 

1 . Number of text blocks sent successfully. 

2. Number of text blocks received successfully. 

3. Number of negative acknowledgements (NAK) re- 
ceived in response to text sent. 

4. Number of data checks that occurred on text 

received. 

5. Number of forward aborts received. A forward abort 

received is: 

Received TTD, ,EOT or DISC 

t I 
Transmitted NAK 

6. Number of EOTs ($BCERR completion code) re- 
ceived in response to data transmitted. 

7. Number of adapter checks that occurred while 
transmitting. 

8. Number of adapter checks that occurred while 
receiving. 

9. Number of invalid responses received to text 

transmitted. 

10. Number of inquiries (ENQ) sent in response to posi- 
tive acknowledgements (ACK). 

1 1 . Number of blocks received from which data was lost. 

12. Number of disconnect timeouts and abortive (cancel) 
disconnects. 

13. Number of timeouts that occurred while receiving 
text. 

For multipoint control stations the following statistics are 
also recorded (see the ERRLOG operand of the $DTFB 

macro instruction): 

1 . Number of unsuccessful transmissions for each ter- 
minal address. 

2. Number of successful transmissions for each ter- 
minal address. 



BSC counters and statistics are recorded in main storage 
whenever a BSC file is closed or before an online test. All 
BSC counters and statistics are logged to disk at end-of-job. 
After the BSC program is terminated, BSC counters and 
statistics can be displayed by the Device Counter Log-out 
program ($$BSDL). For operating procedures required to 
display the statistics, see the appropriate system operators 
guide listed in the Preface. 



BSCA Terminal Log Area 

You must provide a permanent file on F1 for logging con- 
trol station terminal statistics (see index entry Terminal 
Statistics Logging Area). The permanent file, named 
MLTERFIL, requires one track. Part of MLTERFIL com- 
prises the BSCA Terminal Log Area and is used for logging 
the control station terminal statistics. Another part of 
MLTERFIL is used for logging MLTA statistics if MLTA 
is present (see IBM System/3 Multiple Line Terminal Adapt- 
er RPQ Reference and Component Description Manual, 
GC2 1-7560). 



Initializing MLTERFIL 

To initialize MLTERFIL, MLMP provides, in the object 
library, module $$BSFI. The OCL required to initialize 
MLTERFIL is: 

//LOAD$$BSFI,unit 

// FILE NAME-MLTERFIL,UNIT-F1,PACK-pack, 
TRACKS-1,LOCATION-track number (optional), 
RETAIN-P 

//RUN 

MLTERFIL must be initialized after BSCA system genera- 
tion, and before using MLMP or MLTA. If MLMP cannot 
find MLTERFIL on F1 while transmitting or receiving 
data for a control station, MLMP issues the Y6 halt. For 
a complete description of the Y6 halt, see the appropriate 
halt/messages manual listed in the Preface. 

Note: MLTERFIL need be initialized only once to 
accomodate both MLMP and MLTA statistics. Don't 
initialize the file twice if you use both MLMP and MLTA. 
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Online Test 



FROM-address 



The online test enables you, or an IBM customer engineer, 
to test a line connection without interrupting data transfer 
on the other line. The test consists of sending a known mes- 
sage over a line, then determining whether the message was 
received accurately. When the test is completed, results are 
logged as follows: (see index entry online test results). 

• Model 10 and Model 12 - Halt/Syslog is called to log 
the online test results on the system log device. 

• Model 15 - Online test results are logged to the System 
History Area (SHA) and will be printed only if the print- 
er is logged. 



Specifies the symbolic address of the first byte of the test 
message, including control characters. Use this operand only 
for test types 00 and 01 (see index entry online test param- 
eter list for test type descriptions). 



LEN-decdig 

Specifies in decimal the length of the test message, includ- 
ing control characters. See index entry online test param- 
eter list for restrictions on the length of a te:;t message. 
Use this operand only for test types 00 and 01 (see index 
entry online test parameter list for test type descriptions!. 



Requesting Online Test 
To request an online test: 

1 . Build a test parameter list (see index entries $RFTL 
macro instruction and online test parameter list). 

2. Provide a test message if one is required (see index 
entry online test requests). 

3. Issue the $RFT macro instruction 

4. Check the I/O request completion code to deter- 
mine whether the request was accepted (see index 
entry completion code). 

5. Check for completion of the test ($CHK). 

Note: The $BCDNE completion code, after an on- 
line test request, indicates completion of the test; 
$BCDNE does not indicate that the line is okay. To 
determine what happened on the line during the 
test, the operator must examine the logged results of 
the test (see index entry online test results). 



$R FT Macro Instruction: The format of the $RFT macro 
instruction is: 



(name] 


$RFT 


PARM-address (, FROM-address] 
[,LEN-decdig] [,DTF-address] 
[,REJECT-address] 



PARM-address 

Specifies the symbolic address of the first byte of the on- 
line test parameter list. See index entry online test param- 
eter list for the format. 



DTF— address 

Specifies the symbolic address of the PUT DTF (FTYP- 
TSM) for which the online test request is issued. If not 
given, the address of the DTF is assumed to be in register 2. 
After $RFT is executed, register 2 contains the address of 
the DTF for which the online test request was issued. 



REJECT-address 

Specifies the symbolic address of a user routine to receive 
control if the online test request cannot be accepted by 
MLMP. You must provide the routine. 

If the REJECT operand is not specified, check for the 
$BCREQ DTF completion code after each online test re- 
quest to determine whether or not the request was accept- 
ed. See index entry completion code. 



Accepting an Online Test Request 

Valid online test requests transmitted from a remote ter- 
minal are accepted when you issue an initial GET request. 
MLMP then performs the test automatically, logs the re- 
sults to your system logging device (see index entry online 
test results) , and reissues the GET request to receive data. 
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If System/3 does not recognize an online test request you 
receive, the request is passed to you as data. The online 
test types recognized by System/3 are: 



Test 
Type 

00 



01 



06 



14 



23 



Description 

Receive and acknowledge the test message 
the number of times specified in bytes YY 
of the online test parameter list (see index 
entry online test parameter list). The for- 
matted test request must not be more than 
300 characters long. See index entry online 
test requests. 

Transmit the test message the number of 
times specified in bytes YY of the online 
test parameter list (see index entry online 
test parameter list). The formatted test re- 
quest must not be more than 300 characters 
long. See index entry online test requests). 

Transmit 36 alphameric characters, A-Z and 
0-9, the number of times specified in bytes 
YY of the online test parameter list (see in- 
dex entry online test parameter list). Trans- 
mit the characters in ASCII (ASCII adapter 
only). 

Transmit 36 alphameric characters, A-Z and 
0-9, the number of times specified in bytes 
YY of the online test parameter list (see in- 
dex entry online test parameter list). Transmit 
the characters in EBCDIC (EBCDIC adap- 
ter only). 

3270 basic EBCDIC test message: 

This test checks all alphameric characters 
at a display station or printer. It checks the 
use of the WCC to sound the audible alarm 
and allows attribute field specifications to 
be checked at a display station. It starts a 
printer, printing only 40 characters to a 
line. 



Test 
Type 

24 



25 



26 



27 



28 



29-34 



Description 

3270 Model 1 align EBCDIC test pattern: 

This test checks position alignment for the 
480-character display station. It also checks 
the WCC to sound the audible alarm. It 
starts a printer, printing 40 characters to a 
line. 

3270 Model 2 align EBCDIC test pattern: 

This test checks position alignment for the 
1920-character display station. It also checks 
the WCC to sound the audible alarm. It will 
start a printer, printing 80 characters to a 
line. 

3270 orders EBCDIC test message: 

This tests 3270 orders (SF, SBA, etc.), 
checks the WCC to sound the audible alarm, 
and uses display and intensified brightness. 
It starts the printer, printing 64 characters 
to a line. 

3270 EBCDIC Universal Character Set test 
pattern: 

This test uses the Erase/Write command, dis- 
playing the Universal Character Set in 
EBCDIC. It checks the WCC to start the 
printer, sound the audible alarm (on a dis- 
play), and print 132 characters per line on 
the printer. NL and EM are also tested on 
a printer. Display intensity is used. The SF, 
NL, EM, and IC orders are used. 

3270 NL/EM EBCDIC test pattern: 

This test is mainly intended to test the end 
of message (EM) order and multiple new 
line (NL) orders on the printer. The WCC is 
checked to start the printer, sound the alarm 
(on a display), and print 132 characters to 
a line on the printer. 

3270 ASCII test patterns: 

These tests correspond to tests 23-28 except 
that transmission is in ASCII. 
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Online Test Results 

Results are logged in one of two formats, depending on 
whether the test message (not the test request) was trans- 
mitted or received. 

Test Message Transmitted: 

*BSC ONLINE TEST, LINE jl or 2^ [TERMIINAL ADDR HEX hex] 
MESSAGE TYPE tt, MESSAGE COUNT cc 
ACK RCVD NAK RCVD TIMEOUT INVLDMSG 

xx XX XX XX 

* END ONLINE TEST 



TERMINAL ADDR HEX hex identifies the terminal to 
which the test message was sent if the logging station is a 
control station (TYPE-CS in $DTFB). 

tt identifies the test message type. See index entry online 
Test parameter list for a description of the test types. 

cc is the number of times the test message was to be trans- 
mitted. The message count is specified in the online test 
parameter list. 

ACK RCVD xx is the number of times ACK was received 
as a reply to the test message. 

NAK RCVD xx is the number of times NAK was received 
as a reply to the test message. 

TIMEOUT xx is the number of 3-second timeouts recorded 
during the online test by the BSCA. 

INVLD MSG xx is the number of invalid replies received 
in response to test messages sent. 

Test Message Received: 



' BSC ONLINE TEST, LINE jl or 2 |[TERM!NAL ADDR HEXhe 
MESSAGE TYPE tt, MESSAGE COUNT cc 
TXT RCVD DATACHK TIMEOUT INVLD MSG 



TERMINAL ADDR HEX hex identifies the terminal that 
transmitted the test message if the logging station is a con- 
trol station (TYPE-CS in $DTFB). 

tt identifies the test message type. See index entry online 
test parameter list for a description of the test types. 

cc is the number of times the test message was to be trans- 
mitted. The message count is specified in the online test 
parameter list. 

TXT RCVD xx is the number of times the test message was 
received correctly. 

DATA CHK xx is the number of data checks recorded dur- 
ing the online test by the BSCA. 

TIMEOUT xx is the number of 3-second timeouts recorded 
during the online test by the BSCA. 

INVLD MSG xx is the number of test messages received in- 
correctly for which a data check or timeout was not re- 
corded. 

An online test only indicates line conditions existing at the 
time of the test. If the test reveals the presence of line pro- 
blems, you must decide whether the probability of success- 
ful transmission is great enough to justify continued trans- 
mission over the line. 

To discover significant trends in the appearance of line 
problems, consider online test results in conjunction with 
the BSC counters and control station terminal statistics 
(see index entry BSC counters). 



Online Test Considerations 

If you want to request an online test or expect to receive 
a request for an online test, consider that: 

• The MLMP I/O buffers must be large enough to accomo- 
date an online test request. See the RECL and BLKL 
operands in the $DTFB macro instruction, and index 
entries online test requests and MLMP I/O area. 

• No data except the online test message can be sent or 
received over a line that is being tested until the online 
test is complete. 



* END ONLINE TEST 



• An online test request that is not recognized by MLMP 
is accepted as data and moved to your logical buffer. 
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Considerations unique to requesting an online test are: 



Include Trace, Assembler 



• An online test request for System/3 must be the first 
and only text message transmitted over a line. An on- 
line test request transmitted to System/3 after text has 
been sent will be received by System/3 and passed to 
you as data. 

• You must transmit EOT after transmitting an online 
test request to System/3 if the message type is not 00. 
If you transmit data other than the test message before 
you send EOT, System/3 aborts transmission and posts 
the System/3 user with the $BCOLT completion code 
(see index entry completion code). The data transmitted 
before EOT is lost. 

• $RFT should not be used unless the remote device can 
accept remotely initiated online test requests. 

• $RFT must be issued only for a PUT DTF (FTYP-TSM 
in $DTFB) that is opened but not being used for data 
transfer. 

• A multipoint control station (TYPE-CS in $DTFB) 
can only request test type 00 for a tributary station. 
See index entry online test parameter list for a 
description of the test types. 

• A System/3 multipoint tributary (TYPE-MP in $DTFB) 
cannot request that an online test be sent to another 
System/3 tributary in the network. 

See also index entry how to request an online test from a 
3270. 

Trace 



Include the trace module in your program by specifying 
EXTRN $$BSTT in your program, or by placing an IN- 
CLUDE card in the linkage editor input deck: 

// INCLUDE NAME-$$BSTT,UNIT-xx 
(xx is the unit name R1, F1, R2, or F2) 

Note: If you use an INCLUDE statement to call the trace 
module, the overlay linkage editor generates a name not 
referenced error message (0L031 ). This error does not 
affect the output of the linkage editor, however, and should 
be ignored. 

Include Trace, RPG II 

If you are running under RPG II as a subroutine, $$BSMT 
is automatically link-edited as a dummy trace module. If 
you want to include the actual trace module in your pro- 
gram you must rename the dummy and actual trace modules. 
After renaming the modules, recompile your program to 
get the actual module link-edited. The following statements 
are used to rename the trace modules: 

// LOAD $MAINT,xx 

// RUN 

// RENAME FROM-xx,LIBRARY-R,NAME-$$BSMT, 
NEWNAME-$$BSAV 

// RENAME FROM-xx,LIBRARY-R,NAME-$$BSTT, 
NEWNAME-$$BSMT 



If you are familiar with System/3 BSCA hardware and BSC 
line control procedures, you may find a record of the BSCA 
I/O sequence helpful in isolating an MLMP programming 
problem. MLMP provides a trace module ($$BSTT) to 
record I/O information after each BSCA interrupt. This 
information can be examined by you or an IBM customer 
engineer to diagnose a problem. 

Once the trace module is included in your program, each 
MLMP I/O operation calls Trace to record the event in a 
trace table. The format of the table is shown in Appendix 
C. Dump the trace table when you are ready to examine the 
information recorded in it. You can use the $SNAP macro 
instruction to dump the table (see index entry $SNAP 
macro instruction). Dump main storage from symbolic 
address MTBSML to symbolic address MTBSMM, the 
beginning and ending addresses of the trace table. 
(MTBSML and MTBSMM each require that an EXTRN 
be defined in the program requesting the dump.) 



// END 

(xx is the unitname R1, F1, R2, or F2) 

To replace the actual trace module with dummy trace 
module: 

1. Rename the modules: 

// LOAD$MAINT,xx 

// RUN 

// RENAME FROM-xx,LIBRARY-R,NAME-$$BSMT, 

NEWNAME-$$BSTT 
// RENAME FROM-xx,LIBRARY-R,NAME-$$BSAV, 

NEWNAME-$$BSMT 
//END 

(xx is the unitname R1, F1, R2, or F2) 

2. Recompile your program. 
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Trace Considerations 

• ITB interrupts, BSCA enabling operations, and BSCA 
disabling operations are not recorded by Trace. 

• Trace entries are recorded independently of your pro- 
gramming operations. That is, entries are recorded when 
an interrupt occurs regardless of current operations 
occurring in your program, and can be recorded at any 
time, even during a snap dump (see following discussion). 
Consequently, be aware that entries may have been made 
to the trace table after a request to clump the table. 

• Trace requires 512 bytes of main storage. 

• For program efficiency, include Trace in your program 
only when you are trying to diagnose a problem. 



Since a printer is much faster than the console, it is re- 
commended that the system logging device be a printer 
when you intend to use $SNAP. 



$SNAP Macro Instruction Format 



[name] 


$SNAP 


1 D-hex,START-add ress, 
END-address 



ID-hex 

Specifies a 2-byte parameter to identify the dump. The 
parameter is printed at the beginning of the dump output. 



Snap Dump Main Storage ($SNAP) 

The $SNAP macro instruction generates linkage to a system 
storage dump routine. You must provide dump identifica- 
tion and dump limits. The output from the dump routine 
is printed on the system logging device. Output consists 
of: 

1. The dump identification. 

2. The contents of registers 1 and 2. 

3. The address of the next sequential instruction after 
the $SNAP macro instruction. 



START-address 

Specifies the symbolic address of where the dump should 
begin. 



END— address 

Specifies the symbolic address of where the dump should 
end. 



4. The contents of main storage identified by the dump 
limits. 
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Chapter 5. Requirements and Considerations 



SYSTEM CONFIGURATION 

The minimum system configuration and optional device 
support for MLMP is: 



Model 8 

The minimum Model 8 configuration is: 

• 5408 Processing Unit Model A14 (16K bytes) 

• 5444 Disk Storage Drive Model A1 

• 5203 Printer Model 1 

• 5471 Printer-Keyboard Model 1 or Directly attached 
3741 Data Station Model 1 

• Binary Synchronous Communications Adapter (BSCA) 
Local Display Adapter, or Integrated Communications 
Adapter (ICA) 

Additional devices supported for the Model 8 are: 

• 5408 Processing Unit Model A16 (32K), A17 (48K), 
orA18(64K) 

• 5444 Disk Storage Drive Model A2 or A3 

• 5203 Printer Model 2 or 3 

• Binary Synchronous Communications Adapter (BSCA), 
Local Display Adapter, or Integrated Communications 
Adapter (ICA) 

Note: Two adapters can be present. The local display 
adapter, ICA, and BSCA-2 are mutually exclusive. 

• Directly attached 3741 Data Station Model 2 or 
Programmable Work Station Model 3 or 4 



Model 10 

The minimum Model 10 configuration is: 

• 5410 Processing Unit Model A13 (12K bytes) (if not a 
control station, a Model A14 (16K) is required for a 
control station) 

• 5444 Disk Storage Drive Model 1 

• 5424 MFCU Model A1 

• 5203 Printer Model 1 

• Binary Synchronous Communications Adapter (BSCA), 
or Local Communications Adapter (LCA) 

Additional devices supported for the Model 10 are: 

• 5410 Processing Unit Model A14 (16K), A15 (24K), 
A16 (32K), or A17 (48K) 

• 5444 Disk Storage Drive Model 2, 3, A1 , A2, or A3 

• 5445 Disk Storage Model 1, 2, or 3 

• 3410/3411 Magnetic Tape Subsystem Models 1, 2, 
and 3 

• 1442 Card Read Punch Model 6 or 7 

• 5471 Printer-Keyboard 

• 5203 Printer Model 2 or 3 

• 1403 Printer Model 2 or N1 

• 5424 MFCU Model A2 

• Binary Synchronous Communications Adapter (BSCA), 
or Local Communications Adapter (LCA) (both can be 
present) 

• Directly attached 3741 Data Station Model 1 or 2, or 
Programmable Work Station Model 3 or 4 
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Model 12 

The minimum Model 1 2 configuration is: 

• 5412 Processing Unit Model B16 (32K bytes) 

• 3340 Direct Access Storage Facility Model C2 

• 5424 MFCU Model A1 

• 5203 Printer Model 1 

• Integrated Communications Adapter (ICA), Local 
Display Adapter, or Binary Synchronous Communica- 
tions Adapter (BSCA) 

Additional devices supported for the Model 12 are: 

• 5412 Processing Unit Model B17 (48K) or B18 (64K) 

• 3410/341 1 Magnetic Tape Subsystem Models 1 , 2, and 3 

• 1442 Card Read Punch Models 6 or 7 

• 5471 Printer-Keyboard 

• 5203 Printer Model 2 or 3 

• 1403 Printer Model 2, 5, or N1 

• 5424 MFCU Model A2 

• Binary Synchronous Communications Adapter (BSCA), 
Local Display Adapter, or Integrated Communications 
Adapter (ICA) 

Note: Two adapters can be present. The local display 
adapter, ICA, and BSCA-2 are mutually exclusive. 

• Directly attached 3741 Data Station Model 1 or 2 or 
Programmable Work Station Model 3 or 4 

Model 15 

The minimum Model 15 configuration is: 

• 5415 Processing Unit Model A17 (48K bytes) and a 
5444 Disk Stoarge Drive Model A2 

or 
5415 Processing Unit Model B17 (48K bytes) and a 
3340 Direct Access Storage Facility Model A2 

• 3277 Display Station (CRT/Keyboard) 



• 5424 MFCU Model A1 or A2, 2560 MFCM Model 
A1 or A2 

or 
1442 Card Read Punch Model 6 or 7 

• 1403 Printer Model 5 

• Binary Synchronous Communications Adapter (BSCA), 
Display Adapter, or Local Communications Adapter 
(LCA) 

Additonial devices supported for the Model 15 are: 

• 5415 Processing Unit Model A18 (64K), A19 (96K), or 
A20 (128K) (with 5444/5445 disk units) 

• 5415 Processing Unit Model B18 (64K), B19 (96K), or 
B20 (128K) (with 3340 disk units) 

• 5415 Processing Unit Model C21 (160K), C22 (192K), 
C23 (224K), or C24 (256K) (with 3340 disk units) 

• 5415 Processing Unit Model D19 (96K), D20 (128K), 
D21 (160K), D22 (192K), D23 (224K), D24 (256K) 
(with 3340/3344 disk units), D25 (384K), or 

D26 (512K) 

• 3340 Direct Access Storage Facility Model B1 or B2 
(available with 5415-B, -C, and -D models) 

• 5444 Disk Storage Drive Model A3 (available with 
541 5-A models) 

• 5445 Disk Storage Model 1 , 2, or 3 (available with 
541 5-A models) 

• 3410/3411 Magnetic Tape Subsystem Models 1, 2, 
and 3 

• 1403 Printer Model 2 or N1 

• 3284 Printer 

• 2501 Card Reader 

• Interval Timer 

• Directly attached 3741 Data Station Model 1 or 2 or 
Programmable Work Station Model 3 or 4 

• Binary Synchronous Communications Adapter (BSCA), 
Display Adapter, or Local Communications 

Adapter (LCA) 

Note: Two adapters can be present. 
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Storage Requirements 

MLMP resides in the Model 10 Disk System, Model 12, or 
Model 15 libraries and requires: 

• 0.25K in the system nucleus. (The module $$BSIN is 
| required in main storage at execution time - Model 

10 only.) 

• 5.25K of main storage to include: 

$$BMS-MLMP Data Management 
$$BMCH-Check Routine 
$$BSLG-Terminat Statistics Logging Routine 
$$BSAT-Line 2 Work Area 

Additional main storage requirements for MLMP are: 

0.25K for $$BSMD if AUTORS-Y is specified in 
$DTFB 

2.00K for $$BSMA, $$BSMB, $$BSMC, and $$BSMF 
if POLRES-Y is specified in $DTFB 

| 0.50K for $$BSID if the display adapter is supported 

0.75K for Trace ($$BSTT) if Trace is used 

• Main storage for user's code, including I/O buffers, DTFs, 
polling lists, $GETBs, $PUTBs, etc. 

• Two cylinders of disk storage space for object code. 

• Five tracks of disk storage space in the source library for 
MLMP macro instructions. 

• One track of disk storage space for error logging. See 
index entry BSCA Terminal Log Area. 



Programming Requirements 

A. Model 1 

• IBM System/3 Model 10 Disk System Management 
(5702-SC1). 

• IBM System/3 Assembler (5702-AS1) or its equivalent. 

• IBM System/3 Model 10 Disk System Macros Feature 
(Feature Number 6020 or 6021). 

• IBM System/3 Model 10 Disk System Overlay Linkage 
Editor (Feature Number 6026 or 6027), unless MLMP 
programs are written as subroutine to an RPG II 
program. 



B. Model 12 

• IBM System/3 Model 12 Disk System Management 
(5705-SC1 ). This includes the System Macros and Over- 
lay Linkage Editor. 

• IBM System/3 Assembler (5705-AS1 ) or its equivalent. 

C. Model 15 

• IBM System/3 Model 15 Disk System Management 

I (5704-SC1 or 5705-SC2). This includes the System 

Macros and Overlay Linkage Editor. 



I • IBM System/3 Assembler (5704-AS1 or 5704-AS2) 
its equivalent. 



MLMP Programming Considerations 

• The user must define one EXTRN in every MLMP pro- 
gram: $$BSMS. Other required EXTRNs; are generated 
by the MLMP macro instructions when MLMP programs 
are assembled. 

• MLMP Data Management ($$BSMS), BSC DTFs, MLMP 
I/O areas, and user logical buffers must be in the root seg- 
ment. They must not be overlaid. The Allocate, Rollout, 
and Tape End of Volume functions cannot be performad 
while BSCA files are open. See IBM System/3 Over/ay 
Linkage Editor Reference Manual, GC21 -7561 . 

If AUTORS-Y is specified in a $DTFB macro instruction, 
$$BSMD must be in the root segment. If POLRES-Y is 
specified in a $DTFB macro instruction, $$BSMA, $$BSMB, 
and $$BSMF must be in the root segment. 

• Binary and packed decimal data must be transmitted in 
transparent mode (EBCDIC only). 

• A System/3 RPG II program using the RPG II Telecom- 
munications Feature must not call an assembler subrou- 
tine to use a BSCA. (For information on writing an assem- 
bler subroutine for an RPG II program, see IBM System/3 
Basic Assembler Reference Manual, SC2 7509.) 

The MLMP user should also be familiar with the unique BSC 
characteristics of the terminals to be used. Some BSC char- 
acteristics are listed by machine in Appendix A. For more 
information regarding the terminals that can be used with 
MLMP, see the publicaitons listed in the front of this manual. 
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Appendix A. Device-Dependent Considerations 



IBM 2972 BANKING TERMINAL SYSTEM 

• Data received from the 2972 includes the terminal ID 
and keyboard shift characters. 

• Data transmitted to the 2972 must include keyboard 
shift characters for upper case and lower case as well 
as NL, HT, and other appropriate commands. 

• More than one record can be transmitted to the 2972 
before you have to transmit a new line command. 

• If you've been transmitting to one 2980, you must trans- 
mit EOT before transmitting data to another 2980 

(see index entry terminating transmit files). 

For more information regarding the 2972, see Component 
Description: IBM 2972 Models 8 and 1 1 General Banking 
Terminal Systems, GL27-3020. 



Polling/ Addressing a 3270 

There are two kinds of polling for remote 3270 devices: 

• General polling. In a general poll a response is sought 
from any device attached to a particular control unit; 
the control unit has the responsibility of querying each 
device in turn for readiness to provide input. 

• Specific polling. In a specific poll a particular device 
attached to a particular control unit is queried for a 
response. 

Addressing (station selection) is always directed to a speci- 
fic device. 

Polling/addressing list entries are derived from the TERMAD 
operand in $POLB macro instructions (see index entry 
$POLB macro instruction) and are in the following formats: 



IBM 3270 INFORMATION DISPLAY SYSTEM 

Before writing an application program using a 3270, you 
must understand the 3270's physical characteristics and 
capabilities as they are described in IBM 3270 Information 
Display System Component Description, GA27-2749. 
After reading the 3270 component description, use this 
section as a guide to coding MLMP macro instructions to 
control and define I/O for a 3270. Use the 3270 compo- 
nent description to construct data areas (called data stream) 
to send to a 3270 to display an image or print a line, and 
to interpret data streams received from a 3270. Data 
stream formats are shown in this section, but you must have 
read the component description to understand the terms 
within the formats. 

You must also understand binary synchronous telecommuni- 
cations procedures as described in General Information: 
Binary Synchronous Communications, GA27-3004. 

A sample MLMP program that communicates with a 3270 
application is shown in Appendix B. 



General Polling: 



CU 
Address 


CU 
Address 


7F 


7F 




Specific Polling and Addressing: 




CU 
Address 


CU 
Address 


Device 
Address 


Device 
Address 



The control unit and device addresses are repeated because 
binary synchronous multipoint communications for the 
3270 uses double addressing as a check against intermittent 
transmission line errors. The hexadecimal values for de- 
fining a polling/addressing list depend on which control 
unit and device are specified and whether the transmission 
is to be in EBCDIC or ASCII. 

Usually, general polling lists are kept separate from specific 
polling and addressing lists. 

Note: The $CANB macro instruction can be used to ter- 
minate polling. See index entry $CANB macro instruction. 
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Reading From and Writing To a Remote 3270 

I/O control of a remote 3270 is maintained by a combina- 
tion of $GETB and/or $PUTB macro instructions, $CHK 
macro instructions, and, in some cases, by special charac- 
ters in the data stream called an escape command sequence. 
Details of initiating data transfer to and from the 3270 are 
discussed under Read Operations and Write Operations, 
following, and summarized in Figure 8. 



In the discussion that follows of read and write operations, 
the transmission control characters (STX, ETX, etc.), de- 
vice control characters, and field definition information are 
shown in data stream formats; these characters are described 
in IBM 3270 Information Display System Component Des- 
cription, GA27-2749. 



Read Operations 



Read Modified Fields after Operator Action: The basic 
means of reading data entered by a terminal operator, this 
function is performed by issuing an initial GET request 
($GETB) and at least one subsequent GET request. The 
first $GETB initiates a general or specific polling sequence. 
Data is read by the first and subsequent GET requests 
when a terminal is encountered at which the operator has 
done one of the following: 

• Pressed one of these keys: 

ENTER 

PF (program function) keys 1-12 

PA (program attention) keys 1-3 

TEST REQUEST 

CLEAR 

• Selected a detectable field with the selector pen. (See 
the Component Description for establishing a detectable 
field.) 



Reading from a remote 3270, you can: 

• Read modified fields from a display station buffer after 
a terminal operator has completed his entry and caused 
an attention (for instance, by pressing the ENTER key). 

• Read from a display station buffer fields modified by 
an operator without waiting for an attention indication. 

• Read only those modified fields beginning at a specified 
buffer location. 

• Read the entire buffer contents, both modified and un- 
modified data, including attribute characters. 

• Read the buffer contents, both modified and unmodified 
data, including attribute characters, beginning at a speci- 
fic buffer location. 

(Attribute characters and modified and unmodified data 
are described in the 3270 component description.) 

Each of the following five read operations can be terminated 
by transmitting an RVI to the terminal (see index entry 
reverse interrupt). 



• Inserted a card in the operator identification card 
reader. 

All modified fields are read from the terminal buffer into 
the receiver's I/O buffers. A maximum of 256 bytes of 
data, including control characters, are read for each GET 
request. By issuing $GETB with OPC-BLK specified (see 
index entry $GETB macro instruction) and monitoring 
the logical buffer for ETX (meaning that no more message 
blocks remain to be read), you can determine whether all 
available data has been read. 

After the initial $GETB, at least one more $GETB must 
be issued. If all data is read on the first $GETB, the next 
$GETB must be issued to be posted with end-of-file 
(SBCEOT completion code). The message read by the 
initial $GETB will be in one of the formats shown in 
Figure 7. (See the 3270 component description for an ex- 
planation of the AID, cursor address, SBA, and other data 
stream characters illustrated in Figure 7.) 

The ID byte in the BSC DTF ($BDIND) identifies the poll- 
ing list entry of the responding terminal. Either $BDIND 
or the control unit and device address bytes in the data 
stream may be used to determine which device responded 
postively to polling. 
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If the operator presses the ENTER key, a PF (program function) key, or selects a detectable field with the selector pen, 
the message read is in this format (assuming the terminal buffer is formatted): 



STX 



CU 
Address 



Device 
Address 



AID 



Cursor 
Address 



SBA 



Buffer 
Address 



— «- 
Text 

—fl- 



SBA 



Buffer 
Address 



}[ 



JETB) 



If, in the above case, no fields were modified by the operator (or already set to be modified by the program), the format 
of the input message is: 



STX 



CU 
Address 



Device 
Address 



AID 



Cursor 
Address 



ETX 



If the terminal buffer is unformatted, the input message is: 



STX 



CU 
Address 



Device 
Address 



AID 



Cursor 
Address 



Tc " *) n? 



ISI 



If the operator presses the CLEAR key or presses PA (program attention), the input message is: 



STX 


CU 
Address 


Device 
Address 


AID 


ETX 



If a card or cards are read by means of the identification card reader, the input message is: 



STX 


CU 
Address 


Device 
Address 


AID 


0-37 
Characters 


EOR 
EOI 


LRC 


ETX 



If a test request message is entered, the input message is in this format (although the application is not normally aware of it): 



SOH 



STX 



Text 



3 



ETX 



If a status message is read (see Figures 9 and 10), the message received is in the following format: 



SOH 


% 


R 


STX 


CU 
Address 


Device 
Address 


Sense 
Status 1 


Sense/ 
Status 2 


ETX 



Note: Your program must be prepared to receive status messages. 

In all of the above cases, at least one $GIETB is issued to read successive blocks of the message if the message ends with ETB, 
or to get an EOF completion if the message ends in ETX. 

A message block received as the result of subsequent $GETBs has this format (unless it is unformatted) : 



STX 



I 



SBA 



Buffer 
Address 



Text 



SBA 



Buffer 
Address 



i re 



Figure 7. Message Formats Received from the 3270 
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Read Modified Fields: This function is similar to reading 
modified fields after operator action except that the oper- 
ation is directed to a specific device and is performed 
immediately; it does not depend on an attention-causing 
action by the terminal operator. The purpose of this pro- 
cess is to read all modified fields in the device buffer. 

Read modified fields by issuing: 

• A $PUTB macro instruction with OPC-EOB specified 
(see index entry $PUTB macro instruction), and 

• One or more $GETB macro instructions with OPC— BLK 
specified (see index entry $GETB macro instruction. 

When $PUTB is issued, the logical buffer must contain: 



Read modified fields from position by issuing: 

• A $PUTB macro instruction with OPC-EOB specified 
(see index entry $PUTB macro instruction), 

• A second $PUTB macro instruction with OPC-EOB 
specified, and 

• One or more $GETB macro instructions with OPC— BLK 
specified (see index entry $GETB macro instruction). 

When the first $PUTB is issued the logical buffer must 
contain: 



ESC 


1 


WCC 


SBA 


Buffer 

Address 

* 



| ESC | 6" 



Record length ($BDREL) must be 2, and the DTF must be 
a conversational DTF (CONV-Y sepcified in $DTFB). If 
the $BCCRP completion code is posted after checking the 
PUT request for completion ($CHK), issue $GETB. 

Only modified fields are read. Issue $GETBs to read all 
the modified fields in the terminal buffer. That is, issue 
$GETB until the $BCEOT completion code is posted. 

The input data stream received will be in one of the formats 
shown in Figure 7. 



Read Modified Fields from Position: This function reads 
all modified fields beginning at a specified position in the 
device buffer. As the with read modified fields function, 
no operator attention-causing action is required. The pro- 
cess is directed to a specific device. It can be used in a 
manner similar to that for reading modified fields except 
that the program selects only a certain portion of the screen 
(terminal buffer) to read, even though the terminal opera- 
tor may have modified other portions of the screen. 



The output data stream can also include, following the WCC, 
data to be written to the terminal. The WCC should be set 
to inhibit resetting of modified data tags, and the last buffer 
address should be the position from which the read modi- 
fied operation is to start. 

When the second $PUTB is issued, the logical buffer must 
contain: 



I ESC I 6 



Record length ($BDREL) must be 2, and the DTF must 
be a conversational DTF (CONV-Y specified in $DTFB). 
If the $BCCRP completion code is posted after checking 
the second PUT request for completion ($CHK), issue 
$GETB. 

A maximum of 256 bytes of data, including control 
characters, will be read by the first $GETB. The data is 
read from the terminal buffer location established by the 
first $PUTB. The input data stream will be in one of the 
formats shown in Figure 7. 

Read the remaining message blocks by issuing $GETB until 
the $BCEOT completion code is posted. 
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Read Buffer: This function reads the entire contents of a 
specified terminal buffer, including modified and unmodi- 
fied fields, attribute characters, and nulls (X'OO'). It is 
intended primarily for diagnostic use. 

Read a buffer by issuing: 

• A $PUTB macro instruction with OPC-EOB specified 
(see index entry $PUTB macro instruction), and 

• One or more $GETB macro instructions with OPC-BLK 
specified (see index entry $GETB macro instruction). 

When $PUTB is issued, the logical buffer must contain: 



|"escTT1 



Record length ($BDREL) must be 2, and the DTF must be 
a conversational DTF (CONV-Y specified in $DTFB). If 
trie $BCCRP completion code is posted after checking the 
PUT request for completion ($CHK), issue $GETB. 

After this message has been written to the device, the 
$GETB reads the first message block from the terminal 
buffer (since only a maximum of 256 bytes can be trans- 
mitted by one $GETB macro instruction, more read opera- 
tions will be required to read the entire buffer). Subsequent 
$GETBs are then issued to read as many remaining blocks 
of the terminal buffer as the program requires. 

All data beginning at location in the terminal buffer is 
read. In addition, a special character (SF) is inserted by the 
hardware into the input data stream to indicate the begin- 
ning of each field. The input data streann for the first mes- 
sage block, if the terminal buffer is formatted, appears as: 



STX 



CU 
Address 



Device 
Address 



AID 



Cursor 
Address 



JL 



SF 



Attr 
Char 



Text 



SF 



Attr 
Char 



)[ 



IK! 



Subsequent message blocks appear as: 



STX 



][ 



SF 



Attr 
Char 



Text 



SF 



Attr 
Char 



][ 



IKI 



If the terminal buffer is unformatted, no SF characters are 
inserted since there are no fields. The input following the 
cursor address would consist of all character locations 
in the buffer, including nulls. 
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Read Buffer from Position: This function reads the contents 
of a specified terminal buffer beginning at a specified buf- 
fer position. All fields, modified and unmodified, attrib- 
ute characters, and nulls (X'OO') are read. As with reading 
a buffer, reading a buffer from position is intended pri- 
marily for diagnostic uses. 

Read a buffer from position by issuing: 

• A $PUTB macro instruction with OPC-EOB specified 
(see index entry $PUTB macro instruction), 

• A second $PUTB macro instruction with OPC-EOB 
specified, and 

• One or more $GETB macro instructions with OPC— BLK 
specified (see index entry $GETB macro instruction). 

When the first $PUTB is issued the logical buffer must 
contain: 



ESC 


1 


wcc 


SBA 


Buffer 
Address 



The output data stream could also include, following the 
WCC, data to be written to the terminal. The WCC should 
be set to inhibit resetting of modified data tags; and the 
buffer address should be the position from which the read 
buffer from position operation is to begin. 

When the second $PUTB is issued the logical buffer must 
contain: 



ESC 2 



Record length ($BDREL) must be 2, and the DTF must be 
a conversational DTF (CONV-Y specified in $DTFB). If 
the $BCCRP completion code is posted after checking the 
PUT request for completion ($CHK), issue $GETB. 

The $GFTB reads the first message block from the terminal 
buffer beginning at the location specified in the first $PUTB. 
AH data beginning at the specified location is read. In 
addition, a special character (SF) is inserted into the input 
data stream to indicate the beginning of each field. The 
input data stream for the first message block, if the terminal 
buffer is formatted, appears as: 



STX 



cu 

Address 



Device 
Address 



AID 



Cursor 
Address 



I 



SF 



Attr 
Char 



Text 



SF 



Attr 
Char 



\ 



ETB 
ETX 



Subsequent message blocks appear as: 



STX 



E 



SF 



Attr 
Char 



Text 



SF 



Attr 
Char 



1C 



ETB 
ETX 



If the terminal buffer from the specified beginning location 
is unformatted, no SF characters can be inserted, since 
there are no fields. The input following the cursor address 
would consist of all character locations in the buffer, 
including nulls. 



Write: The write function writes a message! to a terminal 
(display station or printer) buffer. To write to a remote 
3270: 

• Issue a $PUTB macro instruction, and 



Write Operations 

Writing to a remote 3270, you can: 

• Write data to any desired position in a display station 
or printer buffer. 

• Erase the data presently at the device buffer (on the 
screen or in the printer buffer) and write data to any 
buffer location. 

• Erase all unprotected fields in the display or printer 
buffer. Protected and unprotected data are described 
in the 3270 component description. 

• Copy data in one device buffer to the buffer of a device 
attached to the same control unit. (For instance, have 
the contents of a display station buffer printed at a 
nearby printer.) 

• Transmit conversational replies. 

Note that if you are transmitting to one terminal attached 
to a 3271 control unit, you must transmit EOT before you 
can transmit to a different terminal attached to the same 
control unit. See index entry terminating transmit files. 
In the description of write operations that follows, consider 
also that whenever you write to a 3270 printer you must 
specify $PUTB OPC-EOW for each record, and need not 
transmit EOT. EOT will be transmitted automatically. 



• Transmit EOT (see index entry terminating transmit 
files). 

When $PUTB is issued, the logical buffer must contain: 



ESC 



WCC 



Orders 
and Text 



SG 



An SBA order sequence should follow immediately after 
the WCC, so that the write operation can be retried if an 
error occurs. See IBM 3270 Information Display System 
Component Description, GA27-2749, for how to write the 
WCC, SBA, and other data stream characters. 

To send the message in blocks instead of in one data stream, 
additional $PUTBs may be issued with the output area in 
the format described above. To terminate the process, 
transmit EOT. 
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Programming Note: If a terminal operator has made an entry 
and pressed the ENTER key but no initial $GETB has been 
issued, an initial $PUTB to the display may nullify the 
operator input. This situation may be avoided by reserving 
areas of the display for operator input only (nothing will 
be written to these areas) and then setting the reset modi- 
fied data (RMD) bit to zero (meaning do not reset modified 
data tags) in the write control character (WCC) of the 
initial $PUTB message. Setting the RMD bit off in the 
WCC is required because if modified data tags are reset as 
part of the initial $PUTB the pending attention will not 
be honored since there will be an indication that no fields 
have been modified. 



Erase and Write: The erase and write function erases the 
buffer of a selected terminal, and then writes a message 
to the terminal buffer. The erasure consists of changing 
each character location in the buffer to X'OO'. With the 
message omitted, the process can be used just to erase the 
buffer. 

Erase and write by: 

• Issuing a $PUTB macro instruction, and 



Erase Unprotected Fields: The erase unprotected fields 
function sets all unprotected fields in a selected terminal 
buffer to nulls (X'OO'). It also resets the modified data tag 
(MDT) bits in the attribute characters of unprotected data 
fields to 0, restores the keyborad, resets the AID, and 
repositions the cursor to the first character location in the 
first unprotected field in the buffer. If the buffer is com- 
pletely protected, the keyboard is restored, and AID reset, 
the cursor moved to location 0, and no erasure takes place. 
(See the component description for a description of the 
attribute and AID characters.) 

Erase unprotected fields by: 

• Issuing $PUTB with OPC-EOB specified (see index entry 
$PUTB macro instruction), and 

• Transmitting EOT (see index entry terminating transmit 
files). 

When $PUTB is issued the logical buffer must contain: 



| ESC | ? | 



• Transmitting EOT (see index entry terminating transmit 
files). 



When $PUTB is issued the logical buffer must contain: 



ESC 



WCC 



Orders and Text 



An SBA order sequence should follow immediately after 
the WCC so that the write operation can be retried if an 
error occurs. 

To send the message in blocks instead of in one data stream 
from one large output area, subsequent $PUTBs may be 
issued with ESC code 1 and WCC specified (see the 
write function). 

To erase and write, the data stream placed in the logical 
buffer would contain an ESC code 5. To simply erase the 
buffer, orders and text would be omitted from the data 
stream. 



Copy: The copy function selects a device and copies into 
its buffer the contents of the buffer of another device 
attached to the same 3271 control unit. Copy can be used 
to transfer the contents of a display station screen to a 
printer to get a printout of the screen or to copy the con- 
tents of one screen onto another. 

To copy: 

• Issue $PUTB with OPC-EOB (OPC-EOW if you are 
copying to a 3270 printer) specified (see index entry 
$PUTB macro instruction), and 

• Transmit EOT (see index entry terminating transmit files). 
When $PUTB is issued the logical buffer must contain: 



ESC 


7 


CCC 


From Device 
Address 



See the component description for a description of the CCC. 
The from device address is the one-byte address of the device 
from which the data is copied. 
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Reply Conversationally: Any of the 3270 write operations 
described on previous page can be transmitted as a con- 
versational reply to a specific terminal. Instead of issuing 
$GETB to receive end of file after you receive a block of 
text ending with ETX, issue a $PUTB to transmit text 
to the terminal. The $PUTB must be issued for the same 
DTF for which you issued the last $GETB, and CONV-Y 
(as well as FTYP-RCV) must have been specified for the 
DTF. (See index entry conversational reply for a detailed 
description of conversational techniques.) 



Conversational replies save line time because you don't have 
to receive EOT and initiate a new addressing sequence in 
order to transmit a response to text received, However, 
to avoid two-second timeouts that lead to a possible 
abort situation, conversational replies should not be used 
if a significant amount of processing must occur on the data 
received before you will be ready to reply to the terminal 
from which the data was received. (A significant amount of 
processing would be, for example, 2 or 3 disk I/O 
operations.) 
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To Do This . . . 


Use These Macro Instructions 1 


With This ESC Code . . ? 


Read Modified Fields 
After Operator Action 


$GETBOPC-BLK 


None 


Read Modified Fields 


$PUTB OPC-EOB 


6 


Then $GETB = OPC - BLK* 


No ESC 


Read Modified Fields 
from Position 2 


$PUTB OPC-EOB 


1 


Then $PUTB OPC-EOB 


6 


Then $GETBs OPC-BLK 4 


No ESC 


Read Buffer 


$PUTB OPC-EOB 


2 


Then $GETBs OPC-BLK 4 


No ESC 


Read Buffer from 
Position 2 


$PUTB OPC-EOB 


1 


$PUTB OPC-EOB 


2 


Then $GETBs OPC-BLK 4 


No ESC 


Write 


$PUTBs 


1 


$PUTB OPC-EOF s 


No ESC 


Erase and Write 


$PUTBs 


5 


Then $PUTB OPC-EOF 5 


No ESC 


Erase Unprotected 
Fields 


$PUTB OPC-EOB 


? 


Then $PUTB OPC-EOF 5 


No ESC 


Copy 


$PUTB OPC-EOB (OPC-EOW to 
Copy to a 3270 Printer) 


7 


Then $PUTB OPC-EOF 5 


No ESC 


A $CHK macro instruction is required with each $GETB or $PUTB macro instruction to determine I/O 
completion. 

2 
In order to effect the read modified fields from position and read buffer from position functions, an 

initial $PUTB is issued first to establish the screen position by specifying an SBA address, and then a 

second $PUTB is issued to send the escape command. 

The ESC code, in character form, is preceded by the ESC character. 

CONV-Y must have been specified in $DTFB for the file, and the $BCCRP completion code must have 
been posted for the previous $PUTB. 

See index entry terminate transmit files for other ways to transmit EOT. 



Figure 8. 3270 Read and Write Functions 
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How to Request an Online Test from a 3270 



3270 Online Test Considerations 



One 3270 can test another 3270 in the same network (or 
test itself) by transmitting an online test request to the 
System/3 control station. To initiate an online test, a 
3270 display station operator must: 



1. 



2. 



Ensure that the screen is unformatted (one way to do 
this is to press CLEAR, then RESET). 

With the cursor at location 0, type in a message with 
the format: 



X 


X 


Y 


Y 


N 


i i i - 
Address 
i i i 



where XX is a number from 23 through 34 (see 
index entry online test parameter list) specifying the 
desired test; YY is a number from 01 through 99 
specifying the number of times the test is to be written 
to the device (if the test is a printer, the test can only 
be sent one time); N is the number four, indicating 
the length of Address; where Address is a sequence 
of four alphameric characters specifying the control 
unit and device to which the test is to be sent. Al- 
phabetic characters must be typed in upper case. 
Because double addressing is used, each control unit 
and device character must be repeated. For example, 
to send a test message to control unit 0, device 1, 
in EBCDIC transmission, the operator would press 
the minus (-) key twice and type two A's. 

3. Press TEST REQUEST. 

The test should now appear at the selected display station 
or printer. 

After the online test is completed, the 3270 operator must 
inform the MLMP program that the previous display was 
erased for the test. (One way to do this is to press CLEAR, 
providing that the MLMP user's program recognizes the 
CLEAR key AID sequence. If the sequence is recognized, 
the MLMP user can issue SPUTBs to refresh the 3270 
screen.) 



• If System/3 does not recognize the online test request 
or cannot accept the request, the online test request is 
passed to the MLMP user as data. Be sure that the 
requested test number is correct, and that the MLMP 
I/O buffers are large enough to accommodate an online 
test request. See index entry online test: 

• If, in response to a general poll by System/3, you request 
an online test after one or more stations, in your cluster 
have transmitted data to the System/3, the System/3 
will be unable to recognize the online test request, and 
will pass the request to the System/3 user as data. 

• If you respond first to a System/3 general poll by re- 
questing an online test (message type not 00) and 
another station in your cluster transmits data after you 
request the test, and before EOT has been transmitted, 
System/3 aborts transmission and posts the System/3 
user with the $BCOLT completion code (see index entry 
completion code). The data transmitted subsequent to 
your request is lost. 

Note: To avoid the last two situations described, try to 
ensure that your station will be the only one responding to 
a general poll by System/3 if you want to request an online 
test in response to a general poll. 



Status/Sense Messages 

Because the 3270 cannot accept data when status is pending, 
you must poll the 3270 for status before you can initiate 
or continue transmission to a 3270 on which status is pend- 
ing. After you attempt to transmit to a 3270, status may 
be pending if the $BCERR completion code is posted or if 
the $BCNEG completion code is posted along with the RVt 
switch set on. In either case, poll the 3270 for status by 
issuing $GETB for the terminal for which you issued the 
unsuccessful $PUTB. (To avoid a polling loop, specify 
LAST -WRAP in $POLB and a LIMIT of 2 or 3 in $DTFB.) 
After receiving the status, you must issue a second $GETB 
to receive EOF (SBCEOT completion code). 
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If The 

Status/Sense 
Bytes 
Contain . . . 


Mnemonic 


This Means . . . 


Applicable 
To ... ' 


See This 
Action 
Number in 
Figure 10 


X'4050' 


IR 


Intervention required for one of these reasons: 

• A command attempted to start a printer but found 
it not ready (out of paper, hung, etc.). The printout 
is suppressed. 

• The power is off on the printer. 


3271,3275 


3A 

I 


• The control unit received a selection addressing 
sequence or specific polling sequence for a device 
that is unavailable or went not ready during a 
printout. (A general poll does not respond to an 
unavailable or not ready indication and proceeds 
to the next device.) 

• The control unit receives a command other than 
diagnostic read or write, for a device that the CU 
has logged as unavailable/not ready. 


3271 


• The printer went not ready during a printout. 


3275 


X'4060' 


CR 


Command reject. Receipt of an invalid or illegal 3270 
channel command (for example, NOP, Sense, Select, 
or Copy if not installed). 


3271, 3275 


4 


X'40C1' 


OC 


Operation check. Any of the following: 

• An illegal buffer address or an incomplete order 
sequence received on a write or erase/write 
command. 


3271, 3275 


4 


• CCC or from address not received on a copy 
command. 


3271 


• Invalid command sequence (ESC is not received in 
second data character position). 

• An I/O interface overrun is detected. This occurs 
during a command when a data byte is presented to 
the control unit by the TCU before the operation 
required by the previous data byte has completed. 


3271,3275 


X'40C2' 


CC 


Control check— timeout. A device has failed to re- 
spond to control unit communications within a 
specified period of time. 


3271 


2A 


In analyzing a status/sense message, the programmer may need to determine whether the device is a 3271 or a 3275. One way to do 
this is to compare the device specified in the status/sense message with a list of all 3275's; if the device is not found in this list, a 
3271 can be assumed. 



Figure 9 (Part 1 of 3). Analyzing 3270 Status/Sense Messages 
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If The 

Status/Sense 
Bytes 
Contain . . . 


Mnemonic 


This Means . . . 


Applicable 

To ... * 


See This 
Action 
Number In 
Figure 10 


X'40C3' 


CC, OC 


Control check, operation check. The condition 
above was detected while the control unit was 
executing an operation with the from device during 
a copy command. 


3271 


1B 


X'40C4' 


DC 


Data check. Either one of the following: 

• An internal parity check or a cursor check oc- 
curred in either the control unit or device buffer. 


3271,3275 


2A 


• A transmit parity check occurred on data sent 
between the device and the control unit. 


3271 


X'40C6' 


DC, OC 


Data check, operation check. A condition above 
occurred while the control unit was executing an 
operation with the from device during a copy 
command. 


3271 


1B 


X'40D1' 


IR, OC 


Intervention required, operation check. Either of 
the following: 

• A copy command contains a from address specify- 
ing an unavailable device. 

• An IR condition (see IR) is detected while the 
CU is executing an operation with the from de- 
vice during a copy command. 


3271 


3B 


X'4C40' 


DB, US 


Device busy, unit specify. The addressed device is 
presently busy executing an operation or a busy 
condition was detected previously by a command. 


3271,3275 


9 


X'4E40' 


DB, US, DE 


Device busy, unit specify, device end. A busy con- 
dition was detected. However, a device end indica- 
tion means the device is no longer busy and the 
operation should be retried. 


3271,3275 


2A 


X'C140' 


TC 


Detection of a BSC error on the TCU transmission. 


3275 


11 


X'C4CV 


OC, US 


Operation check, unit specify. A from address on a 
copy command specified a device with a locked buf- 
fer. (The device was not authorized to be copied 
from.) 


3271 


12 


In analyzing a si 
this is to compa 
3271 can be ass 


atus/sense messag 
re the device spec 
urned. 


e, the programmer may need to determine whether the device is a 3 
fied in the status/sense message with a list of all 3275's; if the devic 


271 or a 3275. On< 
e is not found in th 


> way to do 
is list, a 



Figure 9 (Part 2 of 3). Analyzing 3270 Status/Sense Messages 
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If The 

Status/Sense 
Bytes 
Contain . . . 


Mnemonic 


This Means . . . 


Applicable 

To ... » 


See This 
Action 
Number In 
Figure 10 


X'C240' 


DE 


Device end. Signals that a previously detected busy 
condition has gone not busy, a not ready device has 
gone ready, or a not available device is now available. 


3271,3275 


N/A 


X'C250' 


IR, DE 


Same as X'4050'. 




3A 


X'C2C4' 


DC, DE 


Same as X'40C4'. 




2A 


X'C2C8' 


EC, DE 


Equipment check, device end. A mechanical hang or 
a character generator read out error on the printer. 


3275 


6 


X'C2D8' 


IR, EC, DE 


Same as above. 


3275 


6 


X'C4C4' 


DC, US 


Same as X'40C4'. 




2A 


X'C4C5' 


DC, OC, US 


Same as X'40C4' occurring while the CU was executing 
an operation with the from device on a copy command. 


3271 


2B 


X'C6C4' 


DC, US, DE 


Same as X'40C4'. 


3271 


7 


X'C6C8' 


EC, US, DE 


Same as X'C2C8'. 


3271 


6 


X'C6D8' 


IR, EC, 
US, DE 


Same as X'C2C8'. 


3271 


6 


X'C840' 


DB 


The addressed device is presently busy executing an 
operation or a busy condition was detected previously 
by a command. The device is or was busy executing a 
printout, accepting data from an identification card 
reader, or performing keyboard functions. Set under 
either of these conditions: 

• A command is addressed to a busy device. 

• A specific poll sequence makes a status poll to a 
device and finds it busy. 


3271,3275 


8 


X'C8C1' 


DB, OC 


The same as X'C840' and the CU was executing an 
operation with the from device busy during a copy 
command. 


3271 


10 


In analyzing a status/sense message, the programmer may need to determine whether the device is a 3271 or a 3275. One way to do 
this is to compare the device specified in the status/sense message with a list of all 3275's; if the device is not found in this list, a 
3271 can be assumed. 



Figure 9 (Part 3 of 3). Analyzing 3270 Status/Sense Messages 
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Action 
Number 


Programmer Action 






1A 


Execute a new address selection sequence and retransmit the message starting with the command 
sequence which was teing executed when the error occurred. If the operation is not successful 
after two retries, consider this an unrecoverable error and follow procedure 5A. 


IB 


Same as 1 A except follow procedure 5B after two retries. 


1C 


Same as 1 A except retransmit the entire failing chain of commands. 


2A 


It is suggested that the user reconstruct the entire screen buffer image if this is possible and retry 
the failing chain of commands (within the BSC sequence of operations). If the information in the 
screen buffer is such l:hat it cannot or need not be reconstructed, the operation may still be retried. 
If the operation is not successful after three retries, consider this an unrecoverable error and follow 
procedure 5A. 


2B 


The error occurred during the execution of a copy command. Execute procedure 2A except that 
it is the buffer of the from device specified by the copy command that should be reconstructed. 
After three retries, execute procedure 5B. 


3A 


The error indicates that the printer is out of paper, has the cover open, has the print mechanism 
hung, or the device is unavailable. Wait for the display operator or system operator to intervene 
and mechanically ready the printer. Then retry the printout by issuing a $PUTB with the WCC and 
no data stream. (There is no data error and the data is still intact in the device buffer and can be 
sensed.) Otherwise, execute procedure 2A. 


3B 


The error indicates that the from device specified in a copy command is unavailable. The device 
address associated with the error status/sense information is not the one requiring readying. The 
device requiring corrective action is the from device specified in the copy command. This from 
device should be determined and made ready. Then execute procedure 1B. 


4 


An unrecoverable programming error has occurred. Examine the data stream to locate the problem. 


5A 


Request maintenance on the device giving the trouble. After repair, attempt to reconstruct the 
screen buffer image if possible, starting with an erase/write command in order to correct a missing 
or multiple cursor situation in the device buffer. Retry the failing operations as done in the pro- 
cedure previous to 5A. 


5B 


The from device specified by the copy command in the failing operation is malfunctioning. The 
from device should be determined from the data stream information, and maintenance should be 
requested on the device. After repair, reconstruct the screen buffer image, if possible. The se- 
quence of commands used to reconstruct the image should start with an erase/write command to 
correct a missing or multiple cursor situation in the device buffer. Retry failing operations as done 
in the procedure previous to 5B. 


6 


The error occurred during a printing and indicates either a character generator readout error or a 
print mechanism hanj. There is no data error. The proper error recovery procedure is application 
dependent, since the user may or may not want a new printout. If a new printout is requ red, 
follow procedure 3A. 


7 


A data error occurred in the device buffer during printing; follow procedure 2A. 



Figure 10 (Part 1 of 2). Suggested Actions Glased on 3270 Status/Sense Messages 
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Action 
Number 



8 



10 



11 



12 



Programmer Action 



A specific poll detected that the addressed device is busy. Periodically issue a specific poll to pick 
up the device end status/sense bit which is sent by the device to the TCU when the device becomes 
not busy (unless this status change is detected on a selection addressing sequence). 



A command was erroneously addressed to a busy device. Periodically issue an initial $GETB with 
a specific poll to pick up the device end status/sense bit, which is sent by the device to the TCU 
when the device becomes not busy; then follow procedure 2A. 



This error indicates that in attempting to execute a copy command the from device was found to 
be busy. Execute procedure 1 A when the from device is not busy. (A specific poll read picks up 
the device end status/sense bit.) The device address associated with the status/sense message is the 
address of the to device and not that of the busy from device. 



A BSC error was detected during a text transmission from the TCU. Follow procedure 2A if the 
failing command is a write command which has a data stream of more than 1 byte or if it is in a 
chain of commands and one of the previous commands in the chain is a write command without an 
SBA order immediately following the WCC character. In all other cases, follow procedure 1C. If, 
after following the above retry procedure, the problem is not corrected, follow procedure 5A. 



An unauthorized attempt was made to read data. An effort was made to execute a copy com- 
mand but access to the from device data was not authorized. The device address associated with 
the error status/sense bits is that of the to device. 



Figure 10 (Part 2 of 2). Suggested Actions Based on 3270 Status/Sense Messages 



Polling/ Addressing a 3270 via the Display Adapter 

The display adapter is supported by Models 8, 12, and 15 
only. User assembler programs for the display adapter are 
coded similar to programs for the BSC adapter with the 
following exceptions: 

• The display adapter requires another link-edit of your 
R-module using a new INCLUDE card: 

// INCLUDE NAME-$$BSID,UNIT-xx 
(xx = the unit name R1, F1, R2, F2) 

• The display adapter emulates both the System/3 BSCA 
line 2 attachment and the 3271 control unit of the 3270 
system. 

• The display adapter provides a continuous poll function 
which polls the specified devices in the order given. 
(Devices can be repeated more than once to set up 
priorities.) 

• The poll/address line buffer must contain valid device 
addresses or you will get a unit check (see index entry 
$POLB macro instruction). 



A maximum of 12 unique device addresses can be specified 
for the Models 8 and 12, and a maximum of 30 can be 
specified for the Model 15. 

• 255 total polling entries can be specified in the user pro- 
gram (see index entry $POLB macro instruction). 

• The display adapter is supported on line 2 only. 

• The display adapter addressing (station selection) is 
always directed to a specified device. 

• Display adapter continuous polling line buffer: 



CU 
Address 


CU 
Address 


8F 


8F 


Limit 
Count 


Device _ Device 
Address Address 



Built by MLMP Data 
Management 



From LIMIT 
Keyword, 
$DTFB Macro 



From $POLB Entries 



• Address and polling characters for the display adapter 
are 6060xxxx and 4040xxxx respectively (xxxx are the 
device address characters). 

See Appendix B for samples. 



76 



IBM 3735 PROGRAMMABLE TERMINAL 

Form Descriptor Convert Routine ($$BSCN) 

The Form Descriptor Convert routine (F DP/Convert) is 
provided with MLMP to convert form descriptor programs 
(FDPs) generated on OS or DOS to a format suitable for 
transmission from System/3 to an IBM 3735 Programmable 
Terminal. FDP/Convert converts to a System/3 
file an FDP generated by OS or DOS FDP utility pro- 
grams and punched into cards by IEBPTPCH or an equiva- 
lent punch routine. The System/3 file can then be trans- 
lated 10 a 3735 by an MLMP program. (For information 
on how to generate FDPs on System/3, see IBM Systems 
3735 Support Program Coding Manual, GC2 1-5096.) 



Note: Only the disk files are formatted for transmission 
to a 3735. 

80-Column to 96-Column 

For each 80-column input card, FDP/Convert generates a 
maximum o* two 96-col' nn cards. The information in 
the input card, eycept null characters, is expanded for 
printability and punched in columns 1-86 of a 96-column 
card. (Null characters [X'4Q70'] are inserted into FDP 
records by OS and DOS to pad a record to 476 bytes.) 

As an example of the expansion for printability, the 80- 
column input: 



Whatever the punch routine used to generate the input deck 
for FDP/Convert, the data must be punched in the following 

'"'ma!' 

• Six cards: data in columns 1-72, sequence number in 
columns 73-80; 

• Every seventh card: data in columns 1-44, sequence 
number in columns 73-80. 

That is, seven cards of input for FDP/Convert must contain 
a maximum of 476 bytes, and be equivalent to one OS or 
DOS FDP disk record. (OS FDP disk records always contain 
a maximum of 476 bytes. DOS FDP disk records, however, 
can contain a maximum of 486 bytes. The first 10 bytes 
hi each DOS FDP disk record contain an 8-byte name and 

2 byte sequence number. If you are punching FDP re- 
cords generated on DOS, do not punch the first 10 bytes 
of the disk records.) 

Note: FDP/Convert checks the sequence of input decks. 
If an input card is out of sequence, FDP/Convert issues the 
'P9' halt. See the appropriate halt/messages manual listed 
in the Preface for a complete description of the 'P9' halt. 
For information regarding IEBPTPCH, see IBM System/360 
Operating System Utilities, GC28-6586. 

FDP/Convert can convert: 

• 80-column FDP cards to 96-column expanded format 
cards. 

• 80-column FDP cards to a user-specified consecutive 
5444 disk file. 

• 96-column expanded format FDP cards to a user-speci- 
fied consecutive 5444 disk file. 



Column 
Hex value 



12 3 4 



4 7 4 
3 2 E 



Is converted by FDP/Convert to: 



Column 
Hex value 



Character 



1 2 


3 4 5 6 7 8 


F F 
4 3 


F F F C F F 
7 2 4 5 7 

i 



43724E70 



To generate a deck of 96-column FDP cards from a deck 
of 80-column cards: 

1 . Place, as shown, the following OCL statements and 
data in the 1442 Card Reader/Punch: 

// LOAD $$BSCN,unit 

//RUN 

// CONVERT TO-MFCU,FDPNUM-nnn 

80-column FDP deck(s) 

/* 

2. Place blank 96-column cards in MFCU2. 

3. Begin reading from the 1442. 

The FDP number specified in the // CONVERT statement 
(FDPNUM) is punched in columns 89-91 of each 96-column 
card. Each 96-column card also contains a sequence num- 
ber punched in columns 92-96. 
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80-Column to Consecutive 5444 Disk 

FDP/Convert builds a maximum of one 476-byte disk rec- 
ord for every seven 80-column FDP cards. Null characters 
are deleted. 

To generate from an 80-column card deck a consecutive 
5444 disk file containing one or more FDPs: 

1. Place, as shown, the following OCL statements and 
data in the 1442 Card Reader/Punch: 

// LOAD $$BSCN,unit 

// FILE NAME-$WORK,UNIT-xx,PACK-pack, 
LABE L-your filename, R ECO RDS-number, 

RETAIN- | T \ 

//RUN 

// CONVERT TO-DISK 

80-column FDP deck(s) 

/* 

2. Begin reading from the 1442. 

RECORDS-number in the // FILE OCL statement specifies 
the number of records required to contain the FDP file. 
The maximum number of records required is n divided by 
7, where n = the number of cards in the 80-column input 
deck. 



Expanded 96-Column to Consecutive 5444 Disk 

FDP/Convert repacks expanded format 96-column FDP 
cards, then builds 476-byte disk records from the repacked 
data. 

To generate from a 96-column card deck a consecutive 
5444 disk file containing one or more FDPs: 



//RUN 

//CONVERT TO-DISK 

96-column FDP deck(s) 



(The //CONVERT 
statement is optional.) 



2. Begin reading from the MFCU. 

RECORDS-number on the // FILE OCL statement specifies 
the number of records required to contain the FDP file. 
The number of records required is n divided by 952, where 
n = total number of columns, excluding columns 89-96, 
punched in the 96-column input deck. The number of re- 
cords required is approximately one disk record for every 
eleven input cards. 



FDP/Convert Considerations 

• FDP/Convert requires a 1442 Card Reader/Punch to 
convert 80-column FDP cards. If you don't have a 1442, 
you can use an IBM Business Systems Center or another 
customer installation to run FDP/Convert. Arrangements 
for using an IBM Business Systems Center can be made 
through your IBM representative or the IBM branch 
office serving your locality. 

• All FDPs must be generated initially by System/3 
Model 10 Disk System, OS, or DOS. You can have 
your FDPs generated at an IBM Business Systems 
Center or at a customer installation. Arrangements for 
using an IBM Business Systems Center can be made 
through your IBM representative or the IBM branch 
office serving your locality. 

• To avoid billable maintenance by IBM, be sure your 
FDPs are generated on the current version/modification 
level of System/3, OS, or DOS. IBM may charge you to 
fix an FDP problem if the FDP was generated on an old 
level of System/3 OS, or DOS, and the problem is fixed 
on the current level. 



Place, as shown, the following OCL statements and 
datainMFCUl: 

// LOAD $$BSCN,unit 

// FILE NAME-$WORK,UNIT-xx,PACK-pack, 
LABE L-you r fi lename, R ECO R DS-nu mber. 



RETAIN- 



lil 



Additional 3735 Considerations 

The 3735 has unique data formatting requirements as de- 
scribed in IBM 3735 Programmer's Guide, GC30-3001. 
You must be familiar with these requirements before you 
attempt to communicate with the 3735. 
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Appendix B. Samples 



This appendix contains examples of MLMP macro instruc- 
tions, coded with a minimum of associated assembler state- 
ments, and a complete sample program written to communi- 
cate with the IBM 3270 Information Display System. 



Sample MLMP Macro Instructions 

In pages 8-16 of the following sample MLMP macro instruc- 
tions, the label $DTF is equated to XR2 by the $COMN 
macro instruction, and other labels used are equated 
by the $DTOB macro instruction. 
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Page of GC21-7573-4 
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By TNL: GN21-5587 



Model 10 and Model 12 Sample Program: Communicating with the 3270 



SV ' 70 FXTfRNAL SYMRF1L LIST 

SYMRfH tvdc 

S 12 70 m'IOJL F 

S t R S M S F X T R N 

*«R ST T r XTRN 

ttBMC'M FXTRN 

**RSLG FXTRN 



VFR 14, MPF> 00 08/26/77 PAGF 



^?70 Ml MP 7?70 INFORMATION 0ISPLA/ SYSTfM SAMP1F PROGRAM 

FRR LOG GBJFOT OODE ADPR STMT SOURGF STATFMFNT VFR \ i, , MOP 0C C"/2G/77 PAGF 



? S 1 2 7 START 
000 1 3 F XTRN S*RSMS 

000? ', FXTRN ttRSTT 



° * S1270 IS A SAMPI e ML MP PROGRAM WRITFFN TP I1LUSTRATF THF 

I * Fin OWING - 

II * 

1? * 1. HOW I" fllli ^YSTFM/1 SYSTFM MAGPGS. 

1 ^ * 2. HOW TO r.idf SYSTFM/3 MLMP MACROS. < 
I'' * 3. HOW TO Rc/\p AND WPITF WITH A 1270 I N I OP M A T I ON Al TIS"[*V " 
IS* SYSTFM. 

If, * , 

17 * S'?70 Will PISPIAY A NAMF ANP APORFSS MfSSAG.c ON T»F SG.RffN. THF 

IB * np F oft T nR THFN MAY KFY IN THF NAMF a \j ri AIPRFSS FIFIOS. THF FNTFP < 

19 * KFY SHPII H RF PFPRFSSFP TO INPICAT! IH'- F >•!') GIF T H F FTFIPS. < 

20 * THF DATA FUIOS CNTFREO PY th[ OPFRATPR VIA TFF PISPIAY KFYBOARf) '■ 
?1 * WILL PF PRiNTFL ON IHF SYSTFM IPOOINO ntylCF. THF GIFAR KFY PR THF< 
?? * UNI INF TFST RFOUFST KFY MAY Al SP Rf OS r '>. PRFSSINO THF F^FFR kfy « 
R1 * WITHOUT ANY PATA Will GAUSF r ^n r,F j n R . iifi or ANY GTHFR KFYS « 

24 * WILL CAUSr AN FRJPR MESSAG r TP Rf PRl^T r -n ANP T hi c,rR lr Kj T n Rf t 

25 * RFFRFSHFO WITH THF NA*F ANP APORFSS OI^'IAY. i 
?f * , 

2 7 * 
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Page of GC21-7573-4 
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By TNL: GN21-5587 

S3270 MLMP ^270 INFORMATION DISPLAY SYSTFM SAMPLE PROGRAM 



FRR i nr. r Mrr' 



AnnR stmt soijrcf statfmfnt 



VFR 14, MOD 00 08/26/77 PAGF 



oooo C2 o? oi nr 

04 CO B7 04 
90 OB 8°. 



oooq c? 02 oidf 

0000 CO R7 0004 
11 fi ? 



0008 



30 * 

31** 

32 + 

33 + 

34 + 

35 * 

36 + * 

37 + 
18* 

39 + 

40 * 
4 1 * 
42 * 
4 3 * 
44 * 
45 
46 



tALOC DTF-DTF1 
OFVICE ALLOCATE LINKAGE 
LA DT Fl , tDTF 

R 4 

nr. xi i • 8B ' 

SOPFM CTF-DTFl 
DfcVICF DPFN I INKAGF 
I A DTF 1 , tDTF 

R 4 

DC XL1'82' 



ALLDCATF AND OPFN THE irtfS 

RFLE AS F-7 

SFT AnORFSS OF OTF IN REGISTER 

BRANCH Tn GENERAL FNTRY 

RIB - ALLOCATF SPACE 

RELFAS E-7 

LOAD DTF ADDRESS IN RFGISTFR ? 

GO TO GENERAL FNTRY 

RIB - OPFN 



THIS ROUT I NF W II L SET 
AND ADDRFSS MFSSAGFS 



THF DISPLAY SCRFFN TO NULLS, MOVF THE NAME 
TO THF SCRFFN DISPLAY AND SFT THF CURSOR AND 



BUFFFR ADDRFSS POINTERS TO THE FIRST OPERATOR ENTERED FIFLD. 



SETDIS FQLi * 

* tPUTB DTF-DTF 1 , RF J EC T- RADR F T 



47 + * 



BSCA PUT LINKAGE 



RELEASE-7 



D 



0013 C? 02 01DF 

0016 BD 00 OF 

19 F ? 8 1 3 

001C B9 01 03 

001F PB 40 02 

00 22 F2 9 20 

90 2 5 RR CO 0? 

0028 BD 46 OF 

002B F2 16 2A 

002E BC 40 OF 

00">1 BC 00 OF 

0034 CO 87 0001 

0038 34 01 0045 

003C B5 01 23 

093F 70 4D 07 

0042 C2 01 0000 

0946 F2 81 OF 

0049 F2 87 13 

004C BC 4A OF 

004F F2 87 09 

0052 BC 41 OF 

0055 F2 87 03 

0058 EC 4C OF 

005B CO 87 019F 



005F r? 02 061F 
00 63 CO 8 7 0003 



005F 



49 + 

50 + 

51 + 

52 + 

53 + 

54 + 

55 + 

56 + 

57 + 

58 + 

59 + 

60 + 

61 t 

62 + 

63 + 

64+SS1003 
65+ 

66 + 

67 + tE 1003 

68 + 
69+SE2003 

70 + 

71 +tE3003 
72+J.RJ003 
73 + 
74+tXT003 

75 * 

76 + * 

77 + 

78 + 



LA 
CL I 
JF 
TBN 
TBN 
JF 
TBN 
CLI 
JC 
MVI 
MVI 
B 

ST 
L 

CLI 
LA 
JF 
J 

MVI 
J 

MVI 
J 

MVI 
EOU 
B 

EOU * 

tCHK CKL-LIST1 
GENFRATE A WAIT ON 
LA L IST1, iPARM 

B ttBMCH 



DTF1 ,tDTF 

tRCCMP ( , tDTF ), SBCREQ 

SF1003 

tBDATR ( , $DTF ) , tBCOPN 

tBDATT ( , tDTF ) , tBCOUT 

IF2003 

tRDATTI , $OTF ) , tBCCNV 

tBDCMP (, $DTF ) , IBCCRP 

tF 3003 , tTRU+tHI + tLO 

IB DO PC ( , tDTF ), tBOPUT 

tBDCMP ( , tDTF I , tBCREQ 

ttBSMS 

SS1003+3, tBBAC 1 

tBDI OBI , tDTF ) , tlOB 

tBICMPI ,tIOB) , SBCCAL 

*-*, tBBAC 1 

tF3003 

tXT003 

tBDCMP! , 

$RJ003 

tBDCMP( , 

tRJ003 

tBDCMP! 

* 

BAORET 



tDTF ), SBCIGN 



tDTF ), $BCUFR 



tDTF ) , tBCCAL 



LOAD XR2 WITH DTF AODR . 

LAST OP DONE ? 

NO-GO POST REQUEST IGNORED. 

OPENED ? 

PUT FIL F 7 

NO-GO POST PFRM'T FRROR. 

CONVERSATI ONAL 

RFPLY PENDING 7 

Y c S-GO POST INVALID CALL. 

SFT RFOUFSTFD PUT OPFRATION. 

SET TO OP ACCEPTFD. 

GO TO BSCA DATA MANAGEMENT. 

SAVE XR1. 

LOAD IOB ADDR IN XR1 . 

Q INVALID CALL °OSTED IN IOB? 

RESTORE XR1. 

YES-GO TO POST INVALID REQUEST, 

GO E XI T. 

SET REQUEST IGNORED. 

GO EXIT. 

SET USER ERROR. 

GO EXIT. 

SET INVAt I D CALL . 

GO HANDLF REJECTFO COMMAND. 



LIST CALL 



RELEASF-7 A 

LOAD ADDR OF WAIT LIST 

CALL COMMON WAIT. 



IN XR2. 



0003 



80 + 



FXTRN ttBMCH 



EXTRN FOR ttBMCH. 



0067 BD 44 OE 

006A F2 01 OB 

006D 38 80 971B 

0071 3B 80 071B 



82 


CLI 


83 


JNE 


84 


TBN 


85 


SBF 



tBDCMP (, tDTF ), tBCNFG 

CKGOOD 

MASK.RVI 

MASK ,RVI 



NEGATIVE RESPONSE ? 

JUMP IF NOT NEGATIVE RESPONSE 

RVI PENDING ? 

SFT OFF RVI INDICATOR 
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S3270 MIMP 3270 INFORMATION DISPLAY SYSTEM SAMPLE PROGRAM 



FRR LOC OBJFCT CODE 
075 F2 10 7 



078 RD 40 OF 
007B CO 01 019F 



r )07F C2 2 2 in 

0083 BD 00 OF 

0086 F2 81 41 

089 R8 01 03 



08C 


B8 


80 


02 


OOSF 


F2 


90 


3E 


009 2 


~"t 


01 


009F 


009 6 


B5 


01 


23 


099 


79 


04 


05 


009C 


C2 


01 


0000 



OOAO 88 <~ o 02 

0043 F2 90 09 

00A6 R8 40 OF 

049 BD 46 

004C F? 11 

A F B C 81 

00B2 CO 87 0001 

0B6 3 4 01 0C3 

OORA «5 01 23 

018D 70 4D 07 

OOCO C2 01 0000 



OF 
?7 
OF 



0C4 


F? 


81 


OF 


00C7 


F2 


3 7 


13 


OOF 4 


BC 


44 


OF 


OOCD 


F2 


87 


09 


0000 


RC 


41 


OE 


00D3 


F2 


87 


03 


0006 


BC 


40 


OE 



0009 CO 87 C19F 



OODD C2 02 0622 
00E1 CO 87 00C3 

00F5 BO 42 OF 
00F8 CO 81 0012 
OOFC BO 40 OF 



AODR 


STMT 


SOURCE 


ST4TEMENT 


VER 14, 




H6 




JT 


RESPCN 




0078 


87 


CKGOOD 


EQU 


* 






8 8 




CLI 


jbdcmp ( . 


,$DTF ) ,$BCONE 




H9 




BME 


BADRET 





007F 
007F 



00D9 



OODD 



90 
91 
9 2 
93 
94 
95 
96 
97 



MOD 00 08/26/77 P4GF 4 

GET STATUS IF RVI RESPONSE 

GOOD OP COMPLETION ? 

GO TO ERROR PRINT IF NOT GOOD 

THIS ROUTINE WILL POLL THE 3270 SYSTEM FOR THE OPFRATOR RESPONSE. 
THE D4TA FIELD RECEIVED FROM THE TFRMINAt IS ANALYZED FOR THE 
CLEAR KEY, STATUS MESSAGE, OR ENTER WITH OR WITHOUT DATA. ANY 
OTHER KEY WILL CAUSF AN ERROR MFSSAGF. IF ENTER IS PRFSENT WITH 
NO D4TA THE END OF JOB ROUTINE IS C4LLFD. THE STATUS MESSAGE WILL 
BE PRINTED OUT. THE OPERATOR KEYED DATA FIELDS WILL BE PRINTED. 



98 RESPON ECU * 

99 MORF FQU * 

100 * SGFTB 0TF-0TF2,OPC-BLK,REJECT- 

1C 1+* BSCA GET L INK4GE 



R4DRFT 

RFLF4SF- 



D 



103 + 

1C 4 + 

1 05 + 

1C6 + 

1C7 + 

1 08 + 

1 C'9 + 

1 10 + 

1 1 1 + 

1 1 2+ SSV005 

113 + 

1 1 4 + 

115 + 

1 16 + 

117 + 

1 18+$GT005 

1 1 9 + 

120 + 

121 + 
12 2 + 
1 23+SS10O5 

124 + 

125 + 

1 26+*E1005 
12 7 + 

1 28+tE2005 
129 + 

130+*E 3005 
1 31+$RJ005 
132 + 

133+SXT005 
1 34 * 
1 3 5+* 

136 + 

137 + 

139 
140 
141 



LA 
CLI 

JE 

TBN 

TBN 

JP 

ST 

L 

TBF 

I. A 

TBN 

JF 

TBN 

CL I 

jr. 

MVI 
B 

ST 
L 

CLI 
LA 
JE 
J 

MVI 
J 

MVI 
J 

MVI 
EQU 
B 

EQU » 

tCHK CKL-LIST2 
GENERATE A WAIT ON 
LA LIST2,$PARM 

B $$BMCH 



SBCRFQ 



DTF2 ,$DTF 

$BCCMP( , $DTF ), 

SF1005 

SBOATRI ,$DTF ) , SBCOPN 

tBDATT (, $DTF ), SBCINP 

tE2005 

SSVT05 + 3, SBBAC 1 

4BDI0B ( , $DTF ) , $IOR 

SBIFLA ( , $IOB ) , $R IFST 

*-*, SBBAC1 

$BD4TT ( , tDTF ) ,$BCC NV 

$G T 5 

t BCOPCI , tDTF ), JfiOPUT 

SRDCMP ( ,$DTF ) , SBCCRP 

tF3005, tTRU+$EQ 

$BDOPC(, $OTF ) , SBOGBK 

tSBSMS 

JS1005+3, $BBAC 1 

SBOIOBI, $DTF ), $IOB 

SBICMPI , tlOB) ,$BCCAL 

*-*, $BBAC1 

SE3905 

$XT005 

SBDCMP ( 

$RJ005 

$RDCMP( 

tRJ005 

$BDCMP ( ,tDTF) , $BCCAL 

* 

BADRET 



LIST CALL 



SDTF ), SRCI GN 



$DTF ) , JBCUF R 



CLI tBDCMPI , $DTF ) , tBCEOT 

BE SETD1S 

CLI $BDCMP( ,$0TF ) ,$BCDNE 



LOAD XR2 WITH FTF ADCR. 

LAST OP DONE ? 

NO-GO POST RFOUEST IGNORED. 

OPFNEO ? 

GET FILE ? 

NO-GO POST PfRM'T FRROR. 

S4VF RFGISTFR. 

L040 THE IOB REGISTFR. 

FRRCR FRFE, | 

RFLOAD RFGISTER. 

ANO CCNVFRSAT IONAL ? < I 

NO-GO PROOFS S THE GFT. 

LAST OPERATION A PUT, 

4ND NO CONV. REPLY PENDING ? 

YES-GO POST INVA1ID CALL. 

SFT OP CODF FOR GFT FUNCTION. 

GO TO BSCA DATA MANAG MENT. 

SAVF XP1. 

LOAD IOB AODR IN SRI. 

Q INVALID CALL POSTFD IN IOB? 

RF STORF XR 1. 

YFS-GO TO SFT INVALID RFQUFST. 

GO EXIT. 

SET REQUEST IGNORED. 

GO EXIT . 

SFT USFR FRROR. 

GO EXIT. 

SFT INVALID RFCUFST. 

GO HANDLE REJECTFD COMMAND. 



RFLEASE-7 A 

L04D 4DDR OF W4IT LIST IN 

CALL COMMON W4IT. 

END OF FILE RECEIVED ? 
GO TO PUT IF EOF RETURN 
GOOD OP COMPL FT ION ? 



S3270 MLMP 3270 INF0RM4TI0N DISPLAY SYSTEM SAMPLE PROGRAM 



ERR LOC OBJECT CODE 

00 FF CO 01 01 9F 

00F3 3D 6D 04AE 

OOF 7 CO 81 007F 

OOFR OD 02 04AD 0627 

0101 CO 81 0114 

0105 3D 7D 04AE 

0109 CO 81 0175 

0100 C2 02 05E6 



0111 CO 87 
0115 85 



0116 CO 8 7 0C7F 



ADDR STMT SOURCE STATEMENT 



VER 14, MOD 00 08/26/77 RAGE 



0115 



142 


BNE 


BADRET 


143 


CLI 


WOPK2+3, CL EAR 


1 44 


BE 


MORE 


145 


CLC 


WORK2+2I 3) .STATUS 


146 


BE 


PSTAT 


14"' 


CLI 


WORK2+3, ENTER 


148 


BE 


CATA 


1 49 


LA 


ERROR ,XR2 


150 * 


SSVC 


RIB-HALT 


151 +* 


SUPERVISOR CALL LINKAGE 


152 + 


B 


4 


15 3 + 


DC 


XL1 ■85 1 



PRINT BAD RETURN IF NOT EOF 

WAS CLEAR KEY USED 7 

LOOP TO GET END OF F ILE 

STATUS MESSAGE RECEIVED ? 

GO TO PRINT THE STATUS MESSAGE 

ENTER KEY USED ? 

CHECK FOP DATA IE ENTER 

SET ERROR PARM POINTFR 



RELEASE-7 
BRANCH TO 
RIB - 85 



GENERAL ENTRY 



LOOP BACK TO GET FOF 
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S3270 ^LMP 3270 INFORMATION DISPLAY SYSTEM SAMPLE PROGRAM 

ERR LOC C8JECT COOE ADOR STMT SOURCE STATEMENT 



VER 14, MOD 00 08/26/77 PAGE 



011A 


3C 


FO 


071A 


01 IE 


OC 


10 


0719 071A 


0124 


3C 


OS 


06E8 


0128 


C2 


01 


0709 


01 2C 


C2 


02 


04 A8 


0130 


68 


02 


00 00 


0134 


£8 


03 


01 00 


0138 


C2 


01 


02 


013B 


E2 


02 


01 


013E 


CF 


00 


06E8 06E9 


0144 


CO 


01 


0130 


0148 


C2 


01 


0709 


014C 


3C 


12 


06F8 


015 


7D 


F9 


00 


0153 


F2 


04 


C5 


0156 


4>= 


00 


00 06FA 


015B 


C2 


01 


01 


015E 


OF 


00 


06 F8 06 E9 


0164 


CO 


01 


0150 


0168 


C2 


02 


05 EB 


016C 


CO 


87 


0004 


0170 


85 







011A 



0130 



0150 



015B 



0170 



157 


* 






158 


* THIS ROUTINE WILL PRINT 


159 


* 






160 


PSTAT 


EQU 


* 


161 




MVI 


STAT, ZERO 


162 




MVC 


STAT-K 17), STAT 


163 




MVI 


SCCUNT .NINE 


164 




LA 


STATB.XR1 


165 




LA 


WORK2.XR2 


166 


MOVST 


EQU 


* 


167 




MNZ 


0( ,XR1) ,0( ,XR2) 


168 




MNN 


1(,XR1),0(,XR2) 


169 




LA 


2( ,XR1) ,XR1 


170 




LA 


1(, XR2), XR2 


171 




SLC 


SCOUNT (1 l.ONE 


172 




BNZ 


MOVST 


173 




LA 


STATB.XR1 


174 




MVI 


SCOUNT, EIGTEN 


175 


SETPRT 


EOU 


* 


176 




CLI 


1 ,XR1 ),NONPRT 


177 




JNH 


N0SB39 


178 




SLC 


0( 1.XR1I ,SB39 


179 


N0SB39 


EQU 


* 


180 




LA 


K.XR1) ,XR1 


181 




SLC 


SCOUNT! 1 l.ONE 


182 




BNZ 


SETPRT 


183 




LA 


SMESSG.XR2 


184 


* 


SSVC 


RIB-HALT 


I 85+* SUPERVISCR CALL LINKAGE 


186* 


B 


4 


187* 


DC 


XLl'85' 



STATUS MESSAGES 



0171 CO 87 007F 



189 



MORE 



INITIALIZE THE PRINT AREA 
INITIALIZE MOVE COUNTER 
SET PRINT POINTER 
SET DATA POINTER 

SAVE THE STATUS BYTES 

UPDATE THE PRINT AREA POINTER 
UPDATE THE STATUS POINTER 
UPDATE THE MOVE COUNTER 
LOCP TO MOVE I c NOT DONE 
RESET STATUS MESSAGE POINTER 
RESET PROCESS COUNT 

PRINTABLE CHARACTER ? 
JUMP IF PRINTABLE 
SET TO PRINTABLE 

UPDATE THE PRINT AREA POINTER 
UPDATE PROCESS COUNTER 
LOOP IF NOT END OF PROCESS 
SFT PRINT PARM POINTER 

RELEASE-7 

PRANCH TO GENERAL ENTRY 

RI B - 85 

GO TO GET EOF 
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S3270 MLMP 3270 INFORMATION 01 
ERR LOC OBJECT CODE AODR 



0175 3D 03 04B1 
0179 CO PI 01D1 
0170 OC 10 06B7 0<>D6 
0183 C2 02 050C 



0187 CO 87 0004 
0189 85 

018C OC 10 06E7 04F2 

0192 C2 02 05E1 



0196 CO 87 0004 
019A 85 

019B CO 87 007F 



019F 07 01 0647 0647 

01A5 28 02 0646 OE 

01 AA 28 03 0647 OE 

01AF 30 F9 0647 

01B3 F2 04 06 

01B6 CF 00 0647 06EA 

01BC C2 02 0507 



01C0 CO 87 0004 
01C4 85 

01C5 C2 02 05F0 



01C9 CO 87 0004 
01C0 85 



01CE FO FF FF 



0101 C2 02 01DF 
0105 CO 8 7 0004 
0109 83 



010A CO 87 0004 
01 OE 84 



SPLAY SYSTEM SAMPLE PROGRAM 
STMT SOURCE STATEMENT 



VER 14, MOD 00 08/26/77 PAGE 



0175 



018B 



019A 



019F 



01BC 



01C4 



01CD 



01D1 



0109 



01DE 



191 * 
19 2 * 

193 * 

194 DATA 
195 

196 
197 
198 
199 * 
200+* 

201 + 

202 + 

204 
2 05 
206 * 
207+* 

208 + 

209 + 



THIS ROUTINE IS USED TO PROCESS THE DATA MESSAGES 



EQU 

CLI 

BE 

MVC 

LA 

*SVC 



WORK2+6,ETX 

CLOSE 

NENDI30) .NFIELO 

NAME.XR2 

RIB-HALT 



SUPERVISOR CALL LINKAGE 
B 4 

OC XLl'85' 

MVC AENDI30) .AFIELD 

LA AD0R.XR2 

$SVC RIB-HALT 
SUPERVISOR CALL LINKAGE 
B 4 

DC XLl'85' 



B 



MORE 



THIS ROUTINE CHECKS THE COMPLETION CODE FOR THE GET REQUEST 



21.1 

212 * 

21.3 * 

214 * 

21.5 BADRET EOU * 

216 SZ RET( 2) ,RET(2) 

217 MNZ RET-1, *BDCMP(, $0TF| 

218 MNN RET,$BDCMP( ,«DTF) 

219 CLI RET.NONPRT 

220 JNH NOSET 

221 SLC RET(1),SB39 

222 NOSET EQU * 

223 LA RETURN, XR2 

224 * JSVC RIB-HALT 
225+* SUPERVISOR CALL LINKAGE 
226+ B 4 

227+ DC XLl'85' 

229 LA HLMESS.XR2 

230 * *SVC RIB-HALT 
231+* SUPERVISOR CALL LINKAGE 
232+ B 4 

2 33+ OC XLl'85' 

235 HPL X'FF'.X'FF' 

236 CLOSE EOU * 

237 » SCLOS DTF-0TF1 
238+* DEVICE CLOSE LINKAGE 
239+ LA DTF1.SDTF 
240+ B 4 

241+ DC XL 1*83' 

242 * $EOJ 

243 + * END OF JOB LINKAGE 
244+ B 4 

245+ DC XL1'84' 



ENTER KEY ONLY ? 

GO TO CLOSE IF FNTER ONLY 

MOVE NAME DATA TO PRINT 

SET NAME PRINT PARM POINTER 

RELEASE-7 

BRANCH TO GENERAL ENTRY 

RIR - 85 

MOVE ADDRESS TO PRINT AREA 
SET ADDRESS PARM POINTER 

RELEASE-7 

BRANCH TO GENERAL ENTRY 

RIB - 85 

LOOP TO RECEIVE EOF 



INITIALIZE PRINT AREA 
SAVE THE RETURN CODE 

PRINTABLE CHARACTER 7 

JUMP IF PRINTABLE ? 

SET TC PRINTABLE CHARACTER 

SET PRINT PARM POINTER 

RELEASE-7 

BRANCH TO GENERAL ENTRY 

RIR - 85 

SET HALT PARM POINTER 

RELEASE-7 

eRANCH TO GENERAL ENTRY 
RIB - 85 

HALT TO ALLOW CORE DUMP 

CLOSE THE BSCA FILES 

RELEASE-7 

SET ADOR OF DTF IN REGISTER 2. 

BRANCH TO GENERAL ENTRY 

RIB - CLOSE 

CALL EOJ ROUTINES 

RELEASE-7 

BRANCH TO GENERAL ENTRY 

END OF JOB 
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ERR LOC CBJECT CODE ADOR STMT SOURCE STATEMENT 



VER 14, MOD 00 08/26/77 PAGE 









247 *TF1 


tOTFB 


RECL-104,BLKL-104, BUFST-BUF 1 , BU F EN D- B 1 END, RC AD-WOR K 1 , 








248 * 




FTYP-TSM.LINE-1 


CODE 


-E,T YPE-CS.LISTAD-SFLECT 


.ERRLOG-L 








249 * 




CHN-DTF2.RVI ADR- 


-MASK 


,RVIMSK-80,LIMIT-10 










2 50+* 


BSCA 


DTF. 




RELEASE-8 








000 4 


251 + 


FXTRN 


StBSLG 




EXTRN FOR TERM LOG 


ROUTI NE . 






01DF 


252+0TF1 


EOU 


* 








01DF 


80 


010F 


253 + 


DC 


XL1' 80* 




CEVICE ID. 




01E0 


00 


01E0 


254 + 


DC 


XLl'OO • 




DEFAULT tJPSI OF ZFRO. 


1F1 


11 


01E1 


255 + 


DC 


AL1 (00+00+00+00+9*00 


+65) ATTR BYTF 1. 




01E2 


88 


01E2 


2 56+ 


DC 


XL1' 88" 




ATTR BYTE 2. 




0IF3 


0000 


01E4 


257 + 


DC 


XL2'00' 




POST OPEN DTF CHAI 


N PTR. 


01E5 


C210 


01F6 


258 + 


DC 


AL2( DTF?) 




DTF CHAIN PTR. 




01F7 


COOOOOOO 


01EA 


259 + 


DC 


XL 4 '00' 




SYSTEM SAVE AREA. 




01EB 


0443 


01EC 


260 + 


DC 


AL2 (W0RK1 ) 




AODR OF USER LOGICAL BUFFFR 


01E0 


00 


01ED 


261 + 


DC 


XL1' 00' 




COMPLFTICN CODE. 




OIEE 


00 


OIEE 


262 + 


DC 


XL l'OO • 




OPERATION CODE. 




01EF 


0000 


01F0 


263 + 


DC 


XL2'00' 




BSCA WORK AREA. 




01FI 


00 


01F1 


264 + 


DC 


XL 1 '00' 




INDICATORS . 




01F2 


60F 


01F3 


265 + 


DC 


AL2ISELECT ) 




ADDR OF POLL /ADDR 


LI ST. 


01E4 


Fl 


OIF 4 


2 66+ 


DC 


XL1" Fl' 




POLL/ADCR ID WHEN 


CTRL STAT 


01F5 


CO 


01F5 


267 + 


DC 


XL1 "OO 1 




RE SERVFD. 




01F6 


CA 


01F6 


268 + 


DC 


AL1 (10) 




WRAP L 1ST COUNT. 




01F7 


00 


OIF 7 


269 + 


DC 


XL1' 00" 




RESERVFD. 




01 Ffl 


000000 


01FA 


270 + 


DC 


XL 3' 00' 




RFSERVED. 




01FB 


00B4 


01FC 


271 + 


DC 


XL2'00B4' 




DELAY COUNT. 




01 FD 


0068 


01FE 


272 + 


DC 


AL2( 104) 




RECORD LENGTH. 




01FF 


C068 


200 


273 + 


DC 


AL2( 104) 




BLOCK LENGTH. 




0201 


025B 


0202 


2 74+ 


DC 


AL21BUF1) 




ADDR OF START OF I 


/O AREA. 


0203 


2 FC 


0204 


275 + 


DC 


AL2(B1END) 




ADDR OF FND OF I/O 


AREA. 


0205 


0000000000 


0209 


276 + 


DC 


XL5'00' 




BSCA WORK ARFA. 




020A 


80 


020A 


2 7 7+ 


DC 


XL1' 80' 




RVI MASK. 




020B 


071 B 


20C 


278 + 


DC 


AL2IMASK ) 




RVI MASK ADDR. 




0200 


000000000000 


0212 


279 + 


DC 


XL6'00' 




BSCA WORK AREA. 




021 3 


08 


0213 


280 + 


DC 


ALKC8+00+00) 




TFRM ATTR. 




0214 


CO 


0214 


281 + 


DC 


XL l'OO" 




RESERVED. 




0215 


00000000000 


021A 


2 82 + 


DC 


XL6'00' 




BSCA WORK AREA. 




021B 


05 f<; 


021C 


283 + 


DC 


AL2( LOG) 




ADDR OF TERM LOG AREA. 



C1T70 MLMP 3270 INFORMATION DISPIAY SYSTFM SAMPLF PROGRAM 
f' inr CBJFCT CODF ADDR STMT SOURCF STATEMENT 



VER 14, MOD 00 08/26/77 PAGE 









285 * TF2 


$DTF B 


RFCL-300 ,BLKL 


-300, BUFST-BUF2, BUE FND- B2 FND , RC AD-WOR K2 , 








286 * 




FTYP-RCV.LINE 


- l.CODE-F ,TYPF-CS,1 I STAD-PPLL , 


ERRLOG-LOG 








237+* 


BSCA 


DTF . 


RELEASF-8 








0210 


288 + DTC2 


FOU 


* 






o?i n 


80 


021 D 


289 + 


DC 


XL 1 '80 • 


DEVICF ID. 




021F 


00 


021F 


290 + 


DC 


XL1 '00' 


DEFAULT UPSI OF ZFRO. 


021 F 


89 


021F 


291 + 


DC 


AL 1 ( 00+00+00+ 


OC+9*08+65) ATTR BYTF 1. 




0220 


88 


0220 


292 + 


DC 


XL 1'88' 


ATTR BYTF 2. 




0221 


COOO 


0222 


293 + 


DC 


XL2" 00* 


POST OPEN DTF CHAIN PTR. 


0?23 


FFFf- 


0224 


294 + 


DC 


XL2'FFFc ■ 


DTF CHAIN PTR. 




0225 


COOOOOOO 


0228 


295 + 


EC 


XL4'00' 


SYSTFM SAVE AREA. 




0229 


C4AB 


022A 


296 + 


DC 


AL2IWORK2) 


ADDR OF USER LOGICAL BUFFFR 


02?S 


00 


022B 


297 + 


DC 


XLl'OO • 


COMPLFTITN CODE. 




2 2C 


CO 


022 C 


298 + 


DC 


XL 1 '00' 


OPERATION CODF. 




022D 


0000 


22E 


?°9 + 


DC 


XL2' 00' 


BSCA WORK ARFA. 




022F 


00 


022F 


300 + 


DC 


XL 1 '00 • 


INDICATORS. 




2 30 


61 7 


0231 


301 + 


DC 


AL2 ( POLL ) 


ADDR OF POLL /ADDR 


LI ST. 


0232 


Fl 


0232 


302+ 


DC 


XLl'Fl' 


POLL/ADDR ID WHFN 


CTRL STAT 


0233 


CO 


0233 


303 + 


DC 


XLl'OO ' 


RESERVED. 




0234 


FF 


0234 


304 + 


DC 


XL 1' FF • 


DEFAULT WRAP LIST 


COUNT . 


0235 


00 


0235 


305 + 


DC 


XLl'OO' 


RESERVFD. 




0236 


000000 


0238 


306 + 


DC 


XL3'00" 


RESERVED. 




0239 


C0B4 


023A 


3 7+ 


DC 


XL2' 00 R4' 


DELAY COUNT. 




023B 


012C 


023C 


308 + 


DC 


AL2I300) 


RECORD LENGTH. 




2 3D 


C12C 


023F 


309 + 


DC 


AL2I300) 


BLOCK LFNGTH. 




023F 


02FD 


0240 


310 + 


DC 


AL2IBUF2) 


ADDR CF START OF 


I/O AREA. 


0241 


0442 


0242 


311 + 


DC 


AL2( B2END) 


ADDR OF END OF I/O AREA. 


0243 


0000000000 


0247 


312 + 


DC 


XL5'00' 


BSCA WORK AREA. 




0248 


000000 


024A 


313 + 


DC 


XI 3' 00' 


DEFAULT-NO RVI . 




02 4B 


000000000000 


0250 


314 + 


DC 


XL6'00' 


BSCA WORK AREA. 




0251 


CO 


0251 


315 + 


DC 


AL1 (00+00) 


TERM ATTR. 




0252 


00 


0252 


316 + 


DC 


XL1 '00' 


RESFRVEO. 




0253 


cooooooooooo 


0258 


317 + 


DC 


XL6'00" 


BSCA WORK ARFA. 




0259 


05>=5 


025A 


318 + 


DC 


AL2IL0G) 


ADDR OF TERM LCG 


AREA. 
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FRR LQF CBJFCT COPE AODR STMT SOURCE STATEMFNT VER 1 4 , MOO 00 08/26/77 PAGE 10 

320 * BUFFER AREAS CATA AREAS HALT/SYSLOG PARAMETERS 



BUFFER FOR DTF 1 





25 B 


322 BUF1 EQU 


* 


025B 


COOOOOOOOOOOOOOO 02FC 


323 B1END DC 


XL146 , 00" 


263 


COOOOOOOOOOOOOOO 


323 




02 6 B 


0000000000000000 


323 




0273 


COOOOOOOOOOOOOOO 


323 




027B 


0000000000000000 


323 




0283 


00000000000000 00 


323 




028B 


0000000000000000 


323 




0293 


COOOOOOOOOOOOOOO 


323 




02 9B 


0000000000000000 


323 




02A3 


0000000000000000 


323 




02 AB 


0000000000000000 


323 




02B3 


COOOOOOOOOOOOOOO 


323 




02BR 


0000000000000000 


323 




02C3 


0000000000000000 


323 




02FB 


COOOOOOOOOOOOOOO 


323 




0203 


0000000000000000 


3 ?3 




020B 


0000000000000000 


323 




02F3 


0000000000000000 


323 




2FB 


cooo 


323 






02FD 


324 BUF2 FQU 


* 


02 <=0 


0000000000000000 0442 


325 B2END DC 


342XL1'00' 


021=5 


COOOOOOOOOOOOOOO 


325 




1?fO 


0000000000000000 


325 




0' OS 


oooooooooooooooo 


326 




0300 


C 000000000000000 


325 




0315 


oooooooooooooooo 


325 




03 1 


COOOOOOOOOOOOOOO 


326 




03?5 


OOOOOOOOOOOOOOOO 


3 76 




0320 


COOOOOOOOOOOOOOO 


325 




0335 


COOOOOOOOOOOOOOO 


3 25 




0330 


COOOOOOOOOOOOOOO 


325 




03*5 


OOOOOOOOOOOOOOOO 


325 




"340 


OOOOOOOOOOOOOOOO 


325 




0355 


COOOOOOOOOOOOOOO 


325 




0350 


OOOOOOOOOOOOOOOO 


325 




0365 


OOOOOOOOOOOOOOOO 


325 




0360 


COOOOOOOOOOOOOOO 


3 26 




0375 


OOOOOOOOOOOOOOOO 


325 




03 7 


OOOOOOOOOOOOOOOO 


325 




03 85 


COOOOOOOOOOOOOOO 


326 




0380 


OOOOOOOOOOOOOOOO 


325 




0395 


oooooooooooooooo 


325 




03 90 


COOOOOOOOOOOOOOO 


3 26 




03A5 


COOOOOOOOOOOOOOO 


3 35 




03 AD 


OOOOOOOOOOOOOOOO 


325 




03 B5 


OOOOOOOOOOOOOOOO 


3 25 




0330 


COOOOOOOOOOOOOOO 


325 




03C5 


OOOOOOOOOOOOOOOO 


325 




03 CO 


'COOOOOOOOOOOOOOO 


3 25 




0305 


COOOOOOOOOOOOOOO 


325 




03 00 


OOOOOOOOOOOOOOOO 


325 




03 F5 


COOOOOOOOOOOOOOO 


325 





BUFFER FOR DTF 2 
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S3270 MLMP 3270 INFORMATION DISPLAY SYSTEM SAMPLE PROGRAM 



ERR LOC 


CBJFCT CODE 


AODR 


STMT 


SOURCE STATEMENT VER 1*, 


03F0 


COOOOOOOOOOOOOOO 




325 






03F5 


0000000000000000 




325 






03 ED 


0000000000000000 




325 






0*05 


oooooooooooooooo 




325 






0*0D 


0000000 0000000 00 




325 






0*15 


COOOOOOOOOOOOOOO 




325 






0*1D 


COOOOOOCOOOOOOOO 




325 






0*25 


OOOOOOOOOOOOOOOO 




325 






0*2 


COOOOOOOOOOOOOOO 




325 






0*35 


OOOOOOOOOOOOOOOO 




325 






0*30 


COOOOOOOOOOO 




325 












326 


* COMMAND i 


AND ORDER CHAIN FOR 3270 






0**3 


327 


W0RK1 EQU 


* 


0**3 


27F5C711*0C*1DF0 


0**A 


328 


DC 


XL8 , 27F5C711*OC*1DFO> 


0**B 


C5C1C*C5*060*0 


0*51 


329 


DC 


CL7'NAME -• 


0*52 


1D*013 


0*5* 


330 


DC 


XL3' 10*013' 


0*55 


*0*O* 0*0*0*0*0*0 


0*7* 


331 


DC 


CL32' ■ 


0*50 


*0*0*0*0*0*0*0*0 




331 






0*65 


*0*0*0*0*0*0*0*0 




331 






0*60 


*'0*0*0* 0*0*0*0*0 




331 






0*75 


1DF011C1D*10FO 


0*7B 


332 


DC 


XL7'IDF011C1D*1DF0' 


0*7C 


C1C*C*D9C5E2E2*0 


0*85 


333 


DC 


CLIO'ADORESS - ■ 


0*8* 


eo*o 




333 






0*86 


10*0 


0*87 


33* 


DC 


XL2* 10*0' 


0*88 


*0*0*0*0*0*0*0*0 


0*A5 


335 


DC 


CL30' • 


0*90 


*0*0*0*0*0*0*0*0 




335 






0*98 


*0*0*0*0*0*0*0*0 




335 






0*A0 


*0*0*0*0*0*0 




335 






0*A6 


10F011*0*D 


0*AA 


336 


DC 


XL5'1DF0U*0*D' 






0*AB 


337 


W0RK2 EQU 


* 


0*AB 


OOOOOOOOOOOOOOOO 


0506 


338 


DC 


300XL1'00' 


0*B3 


COOOOOOCOOOOOOOO 




338 






0*BB 


COOOOOOOOOOOOOOO 




338 






0*C3 


OOOOOOOOOOOOOOOO 




338 






0*CB 


OOOOOOOOOOOOOOOO 




338 






0*03 


OOOOOOOOOOOOOOOO 




338 






0*DB 


OOOOOOOOOOOOOOOO 




338 






0*E3 


COOOOOOOOOOOOOOO 




338 






0*EB 


OOOOOOOOOOOOOOOO 




338 






0*F3 


OOOOOOOOOOOOOOOO 




338 






0*FB 


OOOOOOOCOOOOOOOO 




338 






0503 


OOOOOOOOOOOOOOOO 




338 






050B 


OOOOOOOOOOOOOOOO 




338 






0513 


OOOOOOOCOOOOOOOO 




338 






051B 


COOOOOOOOOOOOOOO 




338 






0523 


OOOOOOOOOOOOOOOO 




338 






052B 


COOOOOOOOOOOOOOO 




338 






0533 


COOOOOOOOOOOOOOO 




338 






053B 


OOOOOOOOOOOOOOOO 




338 






05*3 


COOOOOOOOOOOOOOO 




338 






05*B 


OOOOOOOOOOOOOOOO 




338 






0553 


COOOOOOOOOOOOOOO 




338 






055B 


COOOOOOOOOOOOOOO 




338 






0563 


COOOOOOCOOOOOOOO 




338 






056B 


COOOOOOOOOOOOOOO 




338 






05 73 


OOOOOOOOOOOOOOOO 




338 







08/26/77 PAGE 11 



ASSIGNED NAME FIELD 



ASSIGNEO ADORESS FIELD 

SET END OF FIELD AND BUFFER ADD 
OPERATOR RESPONSE BUFFER 
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S3270 MLMP 3270 INFORMATION DISPLAY SYSTEM SAMPLE PROGRAM 



ERR LOC OBJECT CCDE 

057B COOOOO0C0O0OOOOO 

0583 0000000000000000 

05 8B COOOOOOOOOOOOOOO 

0593 0000000000000000 

059B 0000000000000000 

05A3 COOOOOOOOOOOOOOO 

05AB COOOOOOOOOOOOOOO 

05B3 0000000000000000 

05BB COOOOOOOOOOOOOOO 

05C3 0000000000000000 

05CB 0000000000000000 

05D3 COOOOOOO 



AODR STMT SOURCE STATEMENT 

338 
338 
338 
338 
338 
338 
338 
338 
338 
338 
338 
338 



VER 14, MOD 00 08/26/77 PAGE 12 



05D7 200020 
050A C628 



5 DC 
05DF 



05E1 
05F4 



05F6 
05F9 



200030 
06 8 8 



200030 
C6B8 



200020 
C648 



05EB 200030 
05EE C6EB 



05E0 200020 
05E3 0668 



05E5 001A 



05D7 
5D9 
05DB 
05DC 
05DE 
05E0 
05E1 
5F3 
05E5 
05E6 
05F8 
05FA 
05EB 
5ED 
05EF 
5F0 
05F2 
05F4 
5F 5 
05F6 



05F7 COOOOOOCOOOOOOOO 060E 
05FE COOOOOOOOOOOOOOO 
06 07 COOOOOOOOOOOOOOO 



060F 
060F 
0610 
0614 
061 5 
0616 



0617 
0617 
0618 
061C 
0610 
061E 



060F 


20 


0610 


04 


0611 


60604040 


0615 


00 


0616 


FF 



0617 20 

0618 04 

0619 40407F7F 
061D CO 

061E Ft 



340 * HALT / SYSLOG PARAMETERS FOR PRINTING 

341 RETURN EQU * 
XL3' 2C0020' 
AL2IRETRN ) 



DC 
DC 
EQU 
DC 
DC 
EQU 
DC 
CC 
EQU 
DC 
OC 
SMESSG EQU 
DC 
DC 
EQU 
DC 
CC 
EQU 
DC 
DC 



342 

343 

344 NAME 

345 

346 

347 ADOR 

348 

3 49 

350 ERROR 

351 

352 

353 

354 

355 

356 HLMESS 

357 

358 

3 59 LOG 

360 

361 

361 

361 

362 *ELECT 

363+* 

364+SELECT 

365 + 

366 + 

367 + 

368 + 

369 + 

370 *OLL 
371+* 
372+POLL 

373 + 

374 + 

375 + 

376 + 

377 + 

378 * 
3 79+* 



XL3' 200030' 

AL2INBEGIN) 

* 

XL3' 200030" 

AL2IABEGIN ) 

* 

XL3' 200020' 

AL2( ERMESS ) 

* 

XL3'200030' 

AL2ISMSG) 

* 

XL3'2C0020" 

AL2( HMESS ) 

XL2'001A • 
XL24 '00' 



ERROR LOGGING TABLE 



SPOLB I D-2 0,TERMAD-60604040,L EN- 4, LAST-WRAP 

GENERATE A POLL/ADDR LIST. RELEASE-7 A 

EQU * 

DC XL1'20' 

DC ALK4) LENGTH OF POLL/ADOR. 

DC XL4' 60604040' POLL/ADDR CHARS. 

DC XLl'OO' STATUS. 

DC XL1 "FF ' END OF LIST. 

»POLB I0-20,TERMAD-40407F7F,LEN-4,LAST-WRAP 



[ST1 



GENERATE A POLL/ADDR LIST. 

EQU * 

DC XLl'20' 

DC ALK4) 

DC XL4'40407F7F' 

DC XLl'OO' 

DC XLl'FF' 

SCKL DTF-DTF1,LAST-Y 

CHECK LIST FOR COMMON WAIT 



RELEASE-7 



LENGTH CF POLL/AODR. 

POLL/ADDR CHARS. 

STATUS. 

END OF LIST. 

RELEASE-7 B 
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S3?70 Ml. HP 1H0 INFORMATION DISPLAY SYSTFM SAMPLE PROGRAM 

crr ior rijfi-T roof &nn>R stmt source statfmfnt 



VER 14, MOO 00 08/26/77 PAGE 13 



061F 20 
0620 OlPf 



0622 20 
6 23 02 ID 



062 5 01 61" 09 



0628 5BC?C4C3D4D740C"» 
0630 C6D4D7D3C5E3C9D6 
0638 r540C306C4C540C9 
0640 E240604040404040 



0648 
0650 
0658 
0660 

0668 
0670 
06 7 8 
06 80 

0688 
0690 
0698 
06 9A 
06A2 
06AA 
0682 

06 B8 
06CO 
06C8 
06CA 
06D2 
06DA 
06E2 
06F8 
06F9 
06EA 



C905 E5C103C9C440 
C2C5 = 840C8C1 E240 
C 2C 5C5D540F4F2C5 
C440404040404040 

C 3C 5C 6C 540C.30609 
C540C4F4D4D740D4 
C1F840D5D6E640C2 
C54QF3Cin2C5D540 

C5C1D4C540D2C5E8 

C5C4406C40404040 

4040 

4040404040404040 

4040404040404040 

4040404040404040 

4040 <i04C4040 



061 F 
0621 



0622 
0624 

0627 
0406 
04F 2 
0001 
0002 
0003 
OOF 
0060 
007C 
0080 
0009 
0012 
00F9 
0628 
64 7 



0648 
0667 



0668 
0687 



0688 
0699 



06B 8 
06C9 



ClC4C4D9r5E2F240 

C2C5TfeC5C4406040 

4040 

4040404040404040 06E7 

4040404C40404 040 

4040404C404040 40 

4040404 04040 

00 

01 

39 



06EB E2F3C1 E3E4E24004 



6E 8 
06F9 
06FA 
06FB 
0708 



380+1 I 5T1 
38 1 + 

383 * I ST2 
384+1 I ST2 
385 + 



387 
388 
389 
390 
391 
392 
393 
3 94 
395 
396 
397 
398 
399 
400 
401 
401 
401 
401 
402 
403 
403 
403 
403 
404 
405 
405 
40 c 
405 
406 
407 
407 
407 
408 
408 
408 
408 
409 
410 
410 
41C 
41 1 
411 
411 
41 1 
412 
413 
414 
415 
416 



STATUS 

N F I E L D 

A F I F L 

X Rl 

XR2 

FTX 

ZFRO 

CLEAR 

FNTFR 

RVI 

NINF 

E I G T F M 

NONPRT 

RETRN 

RFT 



or 
or 

tCKL 

DC 

DC 

OC 

EQU 

FQU 

EQU 

FQU 

FOU 

EOU 

EQU 

EQU 

EQU 

FQU 

FQU 

FQU 

ECU 

OC 



HMESS 



FQU 

DC 



EOU 
DC 



FOU 
CC 



NFNO 



ABFGIN 



SCOUNT 
ONE 
SB39 
SMSG 



FOU 
OC 



DC 

DC 

DC 

EOU 

DC 



ENTRY STATUS BYTE. 
DTF ADDRESS. 



ENTRY STATUS BYTE. 
DTF ACDRESS. 



AL 1 (0+0+ 32 + + 0) 
AL 2 ( DTF 1 ) 

DTF-0TF2,LAST-Y 
AL 1 (0+0+32+0+0 ) 
AL2IDTF2 ) 

XL 3 '016CD9 1 

WCRK2+43 

WORK2+71 

1 

2 

3 

X" FO' 

X'6D' 

X' 70' 

X '80 • 

9 

18 

X 'F9' 



CL32'$B0CMP COMPLETION CODE IS -• 



CL32 1 INVALID KEY HAS BEEN USED" 



CL32'CEFE CORE DUMP MAY NOW BE TAKEN 1 



CL18'NAMF KEYED 



CL30' 



CLIS'ADORESS KEYED 



CL30" 



XL1' 
XL1 
XL1 ' 



CO* 
01 ■ 
39 • 



CL30'STATUS MESSAGF RECEIVED IS 



S3270 MLMP 3270 INFORMATION DISPLAY SYSTFM SAMPLE PROGRAM 
FRR LOC CBJFCT CODE ADDP STMT SOURCF STATEMFNT 



VER 14, MOD 00 08/26/77 PAGE 14 



06F3 C5F2F2C1C7C540D9 
06FB C5C3C5C9F5C5C440 
0703 C9E2406C4040 



0709 4040404040404040 

07 11 4040404C40404040 

0719 4040 

071B 00 



0709 
071A 



071B 



416 
416 
416 
417 
41 8 
418 
418 
419 



STATB 
STAT 



MASK 



EQU 

DC 



cl ie 



XL 1 "00 • 



RVI MASK HOLC AREA 
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S1270 MLyo 1270 INFORMATION OISPL/' 
ERR L ir PBJFCT TOOF ADOR STM 



42 

42? 



0005 
0004 
0002 
0081 
0007 



000 1 

001D 
0021 
0010 
0008 
0017 
000 A 
0010 
0059 
00C6 



0000 
0080 
0040 
0002 
0003 
OOFF 
0000 
008 
0001 
0002 
0002 



0003 
OOOF 



0080 
OOCO 
OOFF 
0001 
0002 



42 

42 

42 l: 

42 

4?E 

42 

41 

4 3? 

41 

41 

41 

4 If 

43 

41 

4 3 

44 C 

44 

44 
4 44 
44 
44 6 
44 
4 4 P. 
44'; 
450 
451 
4 5 2 
45 
4 54 

4 56 

45 

45E 



46C 
461 
46 
46 



Y SYSTFM SAMPLF PROGRAM 
SOURCF STATEMFNT 



* 10T0B 

+ * BSCA EQUATES. 



+ * 

+$BIFL A 
+4BIFST 
+ 1.B IOB0 
+$BI RV I 
+$BICMP 



FQUATFS IN IOR 



EOU 
EQU 
EOU 
EQU 
FQU 



5 

X'04" 
X" 02 ' 
X '83 ' 
X'07 • 



VER 14, MOO 00 08/26/77 PAGE 15 



REtEASE-1! 



FLAG A. 

FIRST IN FLAG A . 

OFFSET TC IOB OPERATION. 

RCVI OPERATION. 

OFFSET TO IOB COMPLETION. 



EQU 



+ * 

+ SBWK 

+ $BWFG1 EQU 

+ SBWLGO EQU 

+SBPATV FQU 

+SBWRFT EQU 

+ $BP')LD EQU 

♦ SBPCNC FQU 

+SBPRES FQU 

+SBWKMC EQU 

•-SB2SFC EQU 



FQUATFS FOR WORK AREA. 



1 

29 
35 

X' 10' 
X'08 ■ 
X • 17 ' 
X'04' 
X'10* 
X • 59 ' 
X' 06* 



WORK AREA RFG. 

FLAG 3. 

FLAG BYTE. 

LINE ACTIVE INDICATOR. 

RFT IND. IN Fl AG 3 . 

OFFSET TO POLL I NO I C S IN WKA. 

CANCEL POST INDIC. 

RESET POLL INDIC. 

OFFSET FOR LOA INOICS. 

TWO SEC TIME FOR LOA. 



+ SBPATR FQU 



EQUATES FOR $BCPL AND "iBCSW MACROS. 



+SBPACT 
♦SBPEXT 
+SBPDTF 
+SBPNUM 
+ SBPENO 
+ SBPNOP 
+SBPFNA 
+$BPRM 1 
+ i BL S T 2 
+$BLI ST 



FOU 
EQU 
EQU 
EQU 
EQU 
FQU 
ECU 
EOU 
EQU 
FQU 





X'80" 

X '40 • 

2 

1 

X' FE> 

X'OO ■ 

X ' 80" 

1 

2 

2 



+ * EQUATES FOR $RFT MACRO 

+$BRCNT ECU 3 

+ SBHXOF EQU X'OF' 



) + * 

. +*BDI SA 
'+SBENAB 
«+$8F0X 
4 64+SBBAC 1 
465 +1BPRS2 



GENERAL EQUATES, 



EQU 
FQU 
FQU 
EQU 
EOU 



X'80' 

X'CO' 

X • FF' 

1 

2 



CHANGE LIST ATTRIBUTE OFFSET. 
OFF- ACT I VATF; ON-DE ACTIVATE. 
OFF-EXACT, ON-FIRST N CHARS. 
CHANCE LIST DTF AOOR OFFSET. 
CHANGF LIST OFFSFT TO LENGTH. 
END OF POLL/ADDR OR SW ID LIST. 
NO-OP JUMP INSTR. 

ON-ACTIVE;OFF-INACT. LIST ATTR. 
REG EQU FOR MACRO PARM LIST. 
REG ECU FOR POLL OR ID LIST- XR2 
REG EQU FOR PTR TO LIST IN XR2. 



COUNT OF NUMBER OF TRANSMISSIONS 
MASK TO CHECK FOR DECIMAL NUMBER 



ENAELF BSCA. 

DISABLE BSCA. 

EQUATE FOR • FF' . 

USER REGISTER SAVE (RFG 1). 

PARAMETER REGISTER SAVE (REG 2). 





46 7 + * 


FOLATE S 


FO 


0008 


468+SBL IN2 


EQU 


X 


08 


0016 


469+$BTREQ 


EQU 


X 


16 


0010 


470+SBDAON 


FOU 


X 


10 


0088 


471 +SBTOSC 


EQU 


X 


88 


0011 


472+tBTRNQ 


EQU 


X 


11 


0002 


473+$BDTF 


EQU 


2 




0001 


4 74+$BI0B 


EQU 


1 





$CANB MACRC 



LI NE-2. 

TRUE AND EQUAL 

O.A. SUPPORTED 

TWO SEC TIME OUT 

TRUE AND NOT EQUAL 

DTF REG. 

IOB REG. 
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S3270 MLMP 3270 INFORMATION DISPLAY SYSTEM SAMPLE PROGRAM 

ERR LOC OBJECT COOE ADDR STMT SOURCE STATEMENT VER 1 4 , MOD 00 08/26/77 PAGE 16 



0001 475 + SBONE EOU 1 
0003 476+SBTRE EOU 3 



OFFSET FOR CONSTANT ONE 
OFFSET FOR CONSTANT THREE 





478 + * 




OFFSETS FOR 


BSCA DTF 


0000 


479+SBDDEV 


EQU 







0001 


480+*BDUPS 


EQU 


1 




0002 


481<-SBDATT 


EOU 


2 




0080 


482+tBCINP 


EOU 


X'80' 




0040 


483+SBCOUT 


EQU 


X'40' 




OOCO 


484+SBCCNV 


EOU 


X'CO' 




0020 


485+SBCIT B 


EOU 


X'20' 




0010 


486 + tBCRAN 


EQU 


XMO' 




0008 


487t*BCGET 


EOU 


X'08 • 




000* 


488+SBCASK 


EQU 


X'04' 




0001 


489+SBCASM 


EQU 


X' 01' 




0003 


490+$BDATR 


EOU 


3 




008 8 


491+SBCMCN 


EQU 


X'88' 




0080 


492+tBCMPT 


EOU 


X« 80' 




0020 


493+SBCMAN 


EQU 


X'20* 




0010 


494+SBCANS 


ECU 


XMO* 




0008 


495+SRCSWI 


EQU 


X' 08' 




0004 


496+SBCUSO 


EQU 


X'04' 




0002 


497 + tBCACT 


EQU 


X'02 ' 




0001 


498+$BC0PN 


EOU 


X'Ol • 




0005 


499+SBDCHN 


EQU 


5 




000 7 


500+$BONXT 


EQU 


7 




0009 


501+*BDWK1 


EQU 


9 




OOOB 


502-HBDWK2 


EQU 


11 




GOOD 


503+tBDWKB 


EOU 


13 




OOOE 


504+SBDCMP 


EQU 


14 




0000 


505+tBCREQ 


EQU 


X'OO' 




0040 


506+tBCDNE 


EQU 


X« 40' 




0041 


507+SBCUER 


EOU 


X'41' 




0042 


508+SBCEOT 


EQU 


X'42 • 




0043 


509+tBCBID 


EQU 


X'43 • 




0044 


510+SBCNEG 


EQU 


X '44' 




0045 


51 1+SBCNON 


EQU 


X'45' 




0046 


512+SBCCRP 


EQU 


X'46 ■ 




004 7 


513+*BCNDT 


EQU 


X'47' 




0048 


5 14+tBCOL T 


EQU 


X'48' 




0049 


515+SBCNAC 


EQU 


X'49' 




004A 


516-+SBCIGN 


EQU 


X'4A' 




004 B 


517+*BCASC 


EOU 


X'4B' 




004C 


518<-»BCNCN 


EQU 


X'4C 




004D 


519+SBCCAL 


EQU 


X'4D' 




004 E 


520+SBCLST 


EOU 


X'4E • 




004F 


52H-$BCERR 


EQU 


X '4F' 




0050 


522 + *BCTIM 


EQU 


X' 50' 




0051 


523+SBCDAT 


EOU 


X'51 ' 




0052 


524+$BCL0S 


EQU 


X'52' 




0053 


525+SBCCON 


EQU 


X"'53' 




0054 


526 + tBCRSP 


EQU 


X'54' 




0055 


527+SBCADP 


EQU 


X'55' 




0056 


528+*BCCMP 


EOU 


X' 56' 





DEVICE ID. 

UPSI . 

ATTRIBUTE BYTE 1 . 

INPUT FILE. 

OUPUT FILE. 

CONVERSATIONAL FILE. 

ITB MODE. 

TRANSPARENCY . 

GET FILE. 

ON-ASCI I ; OFF-EBCDIC. 

ASSEM DTF. 

ATTRIBUTE BYTE 2. 

MULTIPOINT CONTROL STATION. 

MULTIPOINT TRIBUTARY. 

MANUAL LINE. 

ANSWER LINE. 

SWITCHEO LINE. 

FILE USED. 

FILE ACTIVE. 

FILE OPENED. 

POST OPEN DTF CHAINING PTR. 

DTF CHAINIK8 POINTER. 

WORK AREA. 

WORK AREA. 

ADDRESS OF USER'S LOGICAL BUFF. 

COMPLETION CODE. 

REQUEST ACCEPTED. 

NORMAL COMPLETION. 

USER ERROR. 

END OF FIL E. 

INVALID ID. 

NEGATIVE RESPONSE TO POLL/ADDR. 

NO RESPONSE TO POLL/ADDR. 

CONV REPLY PENDING. 

NO DATA FOR CONV GET. 

INVALID RFT REQUEST. 

NO ACT ENTRY IN POLL LIST. 

REQUEST IGNORED. 

INVALID ASCII CHARACTER. 

NO-CONNECT ION. 

INVALID REQUEST. 

DELAY COUNT EXCEEDED. 

PERM ERROR. 

NO RESP FRCM REMOTE DEV. 

DATA CHECK. 

LOST DATA. 

LOST CONNECTION. 

INVALID RESP FROM REMOTE DEV. 

ADAPTER CHECK. 

NO CCMPLETIONS IN CHECK LIST. 
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ERR LOC CBJECT CODE 



ADDR STMT SOURCE STATEMENT 



0057 


529 + $BCAC0 


EQU 


X'57< 


0058 


530+$BCRLE 


EQU 


X'58" 


OOOF 


53 l+SPDOPC 


EQU 


15 


0080 


532+$BOGET 


EQU 


X' 80' 


0081 


533+$BOGBK 


EQU 


X 1 Rl' 


0040 


534+SBOPUT 


EQU 


X'40' 


0041 


535+SBOPEB 


EQU 


X'41 ' 


0042 


536+tBOPEF 


EQU 


X' 42' 


0044 


537+SBOPEW 


EQU 


X'44' 


0011 


538+$BDMRL 


EQL 


17 


0012 


539+tBDADD 


EQU 


18 


0001 


540+tBCAAl 


EQU 


X'Ol ■ 


0002 


54].+$BCPOL 


EQU 


X'02' 


0004 


542+SBCOFL 


EQU 


X'04 ' 


0008 


543+$BCRCL 


EQU 


X'08 • 


0010 


544+S8CTW0 


EQU 


X 1 10' 


0080 


545+SBCSWO 


EQU 


X'80' 


0014 


546+SBDDCH 


EQU 


20 


0014 


54"' + $B0PSC 


EQU 


20 


001 4 


548+SBDLST 


EQU 


20 


001 5 


549+SBDDCC 


EQU 


21 


0015 


550+$BDIND 


EQU 


21 


0017 


551 t$BDRI 


EQU 


23 


001 7 


552+SBDCNT 


EQU 


23 


0018 


553+SBDRLN 


EQU 


24 


0018 


554+SBDLID 


EQU 


24 


001A 


555 + SBDSI D 


EQU 


26 


001 B 


556+$BDSLN 


EQU 


27 


001D 


557+$BDDLY 


ECU 


29 


001F 


558+*BDREL 


EQU 


31 


0021 


559+$BDBKL 


EQU 


33 


0023 


560+tBDIOB 


EQU 


35 


0025 


561 + SBDBKX 


EQU 


37 


0027 


562 +$BOITB 


EQU 


39 


002A 


563+SBDPRM 


EQU 


42 


002D 


564t$BDRVI 


EQU 


45 


002 E 


565+*BDNDX 


EQU 


46 


0030 


566+SBDWKA 


EQU 


48 


0032 


567+SBDINT 


EQU 


50 


0033 


568+SBDDED 


EQU 


51 


0034 


569+$BDATl 


EQU 


52 


0001 


57C'+$BCSEP 


EQU 


X'Ol • 


0002 


571+$BCSPN 


EQU 


X'02' 


0004 


572+SBCNOW 


EQU 


X'04' 


0008 


573+$BCPUT 


EQU 


X'08 ' 


0010 


574+$BCRES 


EQU 


X'10' 


0040 


575+tBCPLR 


EQU 


X'40' 


003 5 


576+SBDSEP 


EQU 


53 


003 7 


577+SBDSBF 


EQU 


55 


0039 


578+SBDSRL 


EQU 


57 


003B 


579+$BDRFT 


EQU 


59 


003D 


580+SBDTSA 


EQU 


61 




581+* 




ADD 0^ 


003F 


582+SBDRLO 


EQU 


63 


0041 


583 + $BDRCL 


EQU 


65 


0043 


584+SBDARA 


EQU 


67 



AREA OF DTF 



Page of GC21-7573-4 
Issued 25 November 1977 
ByTNL: GN21-5587 
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NO ACTIVE DTPS IN CHECK LIST. 

MAXIMUM RECORD LENGTH EXCEEOED. 

OPERATION CODE. 

GET. 

GET-BLOCK. 

PUT. 

PUT END OF BLOCK. 

PUT END CF FILE. 

PUT EOT TO WACK RESPONSE. 

MAXIMUM RECORD LENGTH. 

SPECIAL USE INDICATORS 

ADD ON AREA ON DTF 

POLLING MODULES RESIDENT 

TRUNCATE RECORD INOICATOR. 

SPAN INDICATOR FOR RECORD LENGTH 

END OF BLOCK INDICATOR. 

ID LIST FOR SWICHED LINE 

♦ADDRESS OF DIAL NUMBER OR 

♦POLL/ADDR CHARACTERS OR 

♦ADDRESS OF POLL/AODR LIST. 

♦ LENGTH OF DIAL NUMBER OR 

♦POLLING/OR ADDRESSING ID. 

♦ADDR OF RCV ID OR ID LIST OR 

♦LIST COUNT. 

LEN OF RCV ID OR ENTRY SELECTOR. 

LAST ID OR POLL/ADDR FUNCTION. 

ADDRESS OF SEND ID. 

LENGTH OF SEND ID. 

DELAY COUNT. 

RECORD LENGTH. 

BLOCK LENGTH. 

ADDRESS OF IOB IN PROCESS. 

POINT TO DATA IN BSCA BUFFER. 

ITB CHARACTER COUNT. 

RESERVED. 

RVI MASK AND DISPLACEMENT. 

INDEX FOR LINE INITIALIZATION. 

ADDRESS OF BSCA WORK AREA. 

DISK ADDR OF LINE INIT MODULE. 

WORK AREA. 

ATTRIBUTE BYTE FOR TERMINALS. 

RECORD SEPARATOR. 

SPANNING RECORD. 

SPAN IN PROCESS. 

PUT SPAN FILE. 

SPAN RESTORE NECESSARY. 

POLLING RESIDENT. 

RECORD SEPARATOR. 

SAVE AREA FOR USER BUFFER ADDR. 

SAVE AREA FOR RECORD LENGTH. 

SAVE AREA FOR OLT PARM . 

ADDR CF TERM LCG AREA. 

ADDR OF RESIDENT LO. 
ADDR OF RESIDENT CLOSE. 
AUTO RESPONSE MODULE. 
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RETRY CCUNT. 

SAVE ADDRESS OF OLT CS. 

3735 CCP EOT INDIC. 

FOR SYSTEM MACROS RELEASE-7 

IOB ACDRESS 
DTE ADORESS 
LOAD ADDRESS 
PARAMETER LIST ADDRESS 
ADDRESS RECALL REGISTER 
INSTRUCTION ADDRESS REGISTER 
TEST TRUE 
TEST FALSE 
TEST HIGH 
TEST LOW 
TEST EQUAL 
BINARY OVERFLOW 
DECIMAL OVERFLOW 
<C S3270 

TOTAL STATFMFNTS IN ERROR IN THIS ASSEMBLY = 



0044 


585+$BDERR 


EOU 


68 


0046 


5 86+$BDTl A 


EOU 


70 


0049 


587+4BD375 


EQU 


73 




588 * 


tCOMN 






589+* COMMON 


LABELS 


000 1 


590+$ IOB 


FQU 


1 


0002 


591+$DTF 


EOU 


2 


0002 


592+tLDADR 


EQU 


2 


0002 


593+$PARM 


EQU 


2 


000 8 


594+$ARR 


FQU 


8 


0010 


595+$IAR 


EQU 


16 


0010 


596+tTRU 


EQU 


X- 10< 


0090 


597+SFLS 


EQU 


X'90 • 


0004 


598+$HI 


EQU 


X'04' 


0002 


599+tLO 


EQU 


X' 02' 


0001 


600+SFQ 


EQU 


X'Ol' 


0020 


601 +SOVFB 


FQU 


X'20' 


0008 


602+$OV< : D 


FQU 


X'08 • 


0000 


603 


ENC 


S3270 
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S3270 










CRCSS REFERENCE 


SYMBOL 


LEN 


VALUE 


DEEN 


REFERENCES 


* $ B MC H 


001 


0003 


0080 


0078 


0137 


StBSLG 


0C1 


0004 


0251 






$$BSMS 


001 


0001 


0003 


0060 


0119 


$$BSTT 


OC1 


0002 


0004 






SARR 


001 


0008 


0594 






«8BACl 


001 


0001 


0464 


0061 


0064* 0109 0112* 


$ 8CAA1 


0C1 


0001 


0540 






tBCACD 


OC1 


0057 


0529 






SRCACT 


001 


0002 


0497 






SBCADP 


0C1 


0055 


0527 






SBCANS 


0C1 


0010 


0494 






SBCASC 


OCl 


004B 


0517 






SBCASK 


001 


0004 


0488 






tBCASM 


OCl 


00C1 


0489 






SBCBID 


OCl 


0043 


0509 






tBCCAL 


001 


004D 


0519 


0063 


0071 0122 0130 


SBCCMP 


001 


0056 


0528 






tBCCNV 


CC1 


OOCO 


0484 


0055 


0113 


$BCCON 


OCl 


0053 


0525 






*BCCRP 


OCl 


0046 


0512 


0056 


01 16 


iBCDAT 


OCl 


0051 


0523 






* BCONE 


OCl 


0040 


0506 


0088 


0141 


tBCEOT 


OCl 


0042 


0508 


0139 




tBCERR 


001 


004F 


0521 






* BCGET 


001 


0008 


0487 






SBCIGN 


OCl 


004A 


0516 


0067 


0126 


♦ BCINP 


OCl 


0080 


0482 


0107 




SBCITB 


OCl 


0020 


0485 






tBCLOS 


OCl 


0052 


0524 






tBCLST 


OCl 


004E 


0520 






SBCMAN 


OCl 


0020 


0493 






SBCMCN 


OCl 


0088 


0491 






i BCMPT 


001 


0080 


0492 






tBCNAC 


001 


0049 


0515 






*BCNCN 


OCl 


004C 


0518 






$BCNDT 


001 


0047 


0513 






tBCNFG 


OCl 


0044 


0510 


0082 




SBCNON 


OCl 


0045 


0511 






$8CNOW 


OCl 


0004 


0572 






SBCOFL 


001 


0004 


0542 






tBCOLT 


OCl 


0048 


0514 






S8C0PN 


OCl 


0001 


0498 


0052 


0106 


*BCOUT 


OCl 


0040 


0483 


0053 




tBCPLR 


OCl 


0040 


0575 






SBCPOL 


OCl 


0002 


0541 






SBCPUT 


OCl 


0008 


0573 






tBCRAN 


001 


0010 


0486 






tBCRCL 


OCl 


0008 


0543 






SBCREQ 


OCl 


0000 


0505 


0050 


0059 0104 


tBCRES 


001 


0010 


0574 






tBCRLE 


OCl 


0058 


0530 






$BCRSP 


OCl 


0054 


0526 






tBCSEP 


001 


0001 


0570 






SBCSPN 


OCl 


0002 


0571 






SBCSWD 


001 


0080 


0545 






SBCSWI 


001 


0008 


0495 
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SYMBOL 


LEN 


VALUE 


DEFN 


REFERENCES 


*BCT1M 


0C1 


0050 


0522 






JBCTWO 


001 


0010 


0544 






tBCUER 


0C1 


0041 


0507 


0069 


0128 


SBCUSD 


0C1 


0004 


0496 






tBOAOD 


0C1 


0012 


0539 






tBDAON 


0C1 


0010 


0470 






SBDARA 


OCl 


0043 


0584 






SPCATR 


0C1 


000' 


0490 


0052 


0106 


JBDATT 


001 


0002 


048 1 


0053 


0055 0107 0113 


S8DAT1 


OCl 


0034 


0569 






JBDBKL 


001 


0021 


0559 






i BDBKX 


001 


0025 


0561 






IBOCHN 


OCl 


0005 


0499 






*BDCMP 


001 


OOOF 


0504 


0050 
0130* 


0056 0059* 0067* 0C69 
0139 0141 0217 0218 


SBDCNT 


OCl 


0017 


0552 






SBODCC 


OCl 


0015 


0549 






tBDDCH 


OCl 


0014 


0546 






tBDOEO 


001 


0033 


0568 






iBDDEV 


001 


0000 


0479 






tBODLY 


OCl 


001D 


0557 






S8DERR 


OCl 


0044 


0585 






SBOIND 


001 


0015 


0550 






SBDINT 


OCl 


0032 


0567 






SBDIOB 


OCl 


0023 


0560 


0062 


0110 0121 


tROIS A 


OCl 


0080 


0461 






SBDI TB 


OCl 


0027 


0562 






SBOLID 


OCl 


0018 


0554 






SBOLST 


001 


0014 


0548 






*BOMRL 


oci 


0011 


0538 






tBONDX 


OCl 


002E 


0565 






tBONXT 


C01 


0007 


0500 






SBOOPC 


OCl 


OOOF 


0531 


0058* 


0115 0118* 


*BDPRM 


OCl 


002A 


0563 






tBDPSC 


OCl 


0014 


0547 






tflDRCL 


OCl 


0041 


0583 






tBDREL 


001 


001F 


0558 






S8DRFT 


001 


003B 


0579 






tBORID 


OCl 


0017 


0551 






tBDRLN 


oci 


0018 


0553 






tBORLO 


OCl 


003F 


0582 






tBDRVI 


OCl 


002D 


0564 






tBDSBF 


001 


0037 


0577 






SBDSEP 


OCl 


0035 


0576 






tBDSID 


001 


001A 


0555 






1B0SLN 


OCl 


001B 


0556 






SBDSRL 


OCl 


0C39 


0578 






SBDTF 


001 


0002 


0473 






tBOTSA 


OCl 


003D 


0580 






tBDTIA 


OCl 


0046 


0586 






tBOUPS 


001 


0001 


0480 






SBOWKA 


OCl 


0030 


0566 






SBDWKB 


OCl 


OOOD 


0503 






tRDWKl 


001 


0009 


0501 






*BQWK2 


OCl 


OOOB 


0502 






SBD375 


OCl 


0049 


0587 







0071* 0082 0088 0104 0116 0126* 0128* 
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tBFNAB 0C1 00C0 0462 

*BFOX 0C1 OOFF 0463 

tBHXOF 0C1 OOOF 0458 

*BICMP 001 0007 0429 0063 0122 

JBIFLA 0C1 00C5 0425 0111 

iBIFST 001 0004 0426 0111 

tBIOB 0C1 0001 0474 

tBIOBQ 0C1 0002 0427 

*BIRVI 0C1 0083 0428 

JBLIN2 0C1 0008 0468 

*BLIST 001 0002 0454 

JBLST2 001 0002 0453 

*BOGBK 001 0081 0533 0118 

1B0GET 0C1 0080 0532 

JBONE 0C1 0001 0475 

JBOPEB 0C1 0041 0535 

SBOPEF 0C1 0042 0536 

SPHPEW 0C1 0044 0537 

*BOPUT 001 0040 0534 0058 0115 

*ePACT 001 0080 0445 

tBPATR 0C1 0000 0444 

$BPATV 0C1 0010 0435 

tePCNC 001 0004 0438 

*BPDTF 0C1 0002 0447 

SBPENA 0C1 0080 0451 

*BPEN0 0C1 OOFE 0449 

SBPEXT 0C1 0040 0446 

JBPNOP 0C1 0000 0450 

JBPNUM 001 0003 0448 

*BPOLD 0C1 0017 0437 

SBPRES 0C1 0010 0439 

JBPRMl 0C1 0001 0452 

JBPRS2 0C1 00C2 0465 

*BRCNT 001 0003 0457 

*BTOSC 001 0088 0471 

*BTRE 0C1 0003 0476 

tBTREQ 001 0016 0469 

*BTRNQ 0C1 0011 0472 

JBWFG3 001 001D 0433 

$BWK 001 0001 0432 

*BWKMC 0C1 0059 0440 

SBWLGO 0C1 0023 0434 

SBWRFT 001 0008 0436 

»B2SEC 0C1 0006 0441 

*OTF 001 0002 0591 0032* 0037* 0049* 0050 0052 0053 0055 0056 0058 0059 0062 0067 

0069 0071 0082 0088 0103* 0104 0106 0107 0110 0113 0115 0116 
0118 0121 C126 0128 0130 0139 0141 0217 0218 0239* 

SEQ 001 0001 0600 0117 

*E1003 0C3 004C 0067 0051 

$E1005 0C3 OOCA 0126 0105 

*E2003 003 0052 0069 0054 

*E2005 0C3 0000 0128 0108 

*E3003 0C3 0058 007 1 0057 0065 

*E3005 003 0006 0130 0117 0124 

*ELS 0C1 0090 0597 

JGT005 0C3 OOAF 0118 0114 

*HI 001 0004 0598 0057 

SIAR 0C1 0010 0595 

JIOB 0C1 0001 0590 0062* 0063 0110* 0111 0121* 0122 

tLOADR 001 0002 0592 

*L0 0C1 0002 0599 0057 

$OVFB 0C1 0020 0601 

tOVFD 001 0008 0602 

JPARM 0C1 0002 0593 0077* 0136* 

*RJ003 0C1 005B 0072 0068 0070 

*RJ005 001 0009 0131 0127 0129 

*SV005 0C4 009C 0112 0109* 

SS1003 0C4 C042 0064 0061* 

$S1005 0C4 OOCO 0123 0120* 

*TRU 0C1 0010 0596 0057 0117 

*XT003 001 005F 0074 0066 

*XT005 0C1 OODD 0133 0125 
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SYMBtlL 


LEN 


VALUF 


DEFN 


REFERENCES 






ABEGIN 


0C1 


06B8 


0409 


0349 








AOOR 


001 


05F1 


0347 


0205 








AEND 


030 


06E7 


041 1 


0204* 








AE IELO 


0C1 


OAF 2 


0389 


0204 








8 ADRET 


0C1 


019P 


0215 


0073 


0089 


0132 


0142 


BUF1 


001 


025B 


0322 


0274 








BUE2 


0C1 


02F0 


0324 


0310 








B1END 


146 


02 EC 


032^> 


0275 








B2END 


0C1 


0442 


0325 


0311 








CKGOOD 


CC1 


0078 


0087 


0083 








CLEAR 


0C1 


0060 


0394 


0143 








CLOSE 


0C1 


01D1 


02 3 6 


0196 








OAT A 


0C1 


0175 


0194 


0148 








PTF1 


0C1 


01DF 


0252 


0032 


0037 


0049 


0239 


DTF2 


0C1 


0210 


0288 


0103 


0258 


0385 




EIGTEN 


0C1 


0012 


0398 


0174 








FNTER 


0C1 


0070 


0395 


0147 








ERMESS 


0C1 


0648 


0402 


0352 








ERROR 


001 


05E6 


0350 


0149 








FTX 


0C1 


0003 


0392 


0195 








HLMFSS 


0C1 


05FO 


0356 


0229 








HMESS 


0C1 


0668 


0404 


0358 








LIST1 


0C1 


061F 


0380 


0077 








L IST2 


0C1 


0622 


0384 


0136 








LCG 


001 


05F5 


0359 


0283 


0318 






MA SK 


0C1 


071B 


0419 


0084 


0085* 


0278 




MORE 


0C1 


007F 


0099 


0144 


0155 


C189 


0211 


MOVST 


PCI 


0130 


0166 


0172 








NAME 


0C1 


5 DC 


0344 


0198 








N B F G I N 


0C1 


0688 


0406 


0346 








N<=N0 


030 


06B7 


0408 


0197* 








NFIELD 


0C1 


04D6 


03 8 8 


0197 








NINE 


0C1 


0009 


0397 


0163 








NONPRT 


0C1 


00F9 


0399 


0176 


0219 






NCSB39 


0C1 


015B 


0179 


0177 








NOSET 


0C1 


01BC 


0222 


0220 








PNC 


0C1 


06E9 


0413 


0171 


0181 






POLL 


0C1 


0617 


0372 


0301 








PST AT 


0C1 


011A 


0160 


0146 








RESPON 


0C1 


007F 


0098 


0086 








RFT 


032 


0647 


0401 


0216 


0216* 


0217* 


0218* 


RFTRN 


0C1 


0628 


0400 


0343 








RFTURN 


0C1 


05D7 


0341 


0223 








RVI 


0C1 


0080 


0396 


0084 


0085 






SB39 


001 


06EA 


0414 


0178 


0221 






scount 


0C1 


06E8 


0412 


0163* 


0171* 


0174* 


0181* 


SELECT 


0C1 


060F 


0364 


0265 








SETOIS 


001 


0012 


0045 


0140 








SETPRT 


0C1 


0150 


0175 


0182 








SMESSG 


0C1 


05EB 


0353 


0183 








SMSG 


0C1 


06EB 


0415 


0355 








STAT 


018 


071A 


0418 


0161* 


0162 


0162* 




STATB 


001 


0709 


0417 


0164 


0173 






STATUS 


003 


0627 


0387 


0145 








S3270 


oci 


0000 


0002 


0603 








W0PK1 


001 


0443 


0327 


0260 








W0RK2 


OCI 


04AB 


0337 


0143 


0145 


0147 


0165 


XR1 


OCI 


0001 


0390 


0164* 


0167 


0168 


0169 


XR2 


OCI 


0002 


0391 


0149* 


0165* 


0167 


0168 


ZFRO 


001 


OOFO 


0393 


0161 








TOTAL STATFMFNTS 


IN ERROR IN THIS ASSEMBLY 


= 



0381 



0219 0221* 



0195 0296 0388 0389 

0169* 0173* 0176 0178 0180 0180* 

0170 0170* 0183* 0198* 0205* 0223* 0229* 







OL105 I THE CODE LENGTH OF S3270 IS 1820 DECIMAL. 
OL103 ! TOTAL NUMBER OF LIBRARY SECTORS REQUIRED IS 9 

NAME -S3 270 , P ACK -R 1R 1 R 1 , UN IT-R 1 , R ETA IN-T ,L I BR AR Y-R , C AT EGOR Y-000 
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Appendix C. Data Areas, Parameter Lists, and Message Formats 



BSCDTF 



Displacement 




Length 








Hex Decimal 


Label 


in Bytes 


Description 







$BDDEV 


1 


Device ID 


X'80' for BSCA 1 
X'88' for BSCA 2 


1 1 


$BDUPS 


1 


UPSI: U1 


-U8, customer controlled program switches 


2 2 


$BDATT 


1 


Attribute byte 1 










Value 


Label 


Description 








X'01' 


SBCASM 


Assembler DTF 








X'04' 


$BCASK 


On-ASCIIfile 
Off-EBCDIC file 








X'08' 


$BCGET 


GET file 








X'10' 


$BCRAN 


Transparent mode 








X'20' 


$BCITB 


ITB mode 








X'40' 


$BCOUT 


Output file 








X'80' 


$BCINP 


Input file 








X'CO' 


$BCCNV 


Conversational file 


3 3 


$BDATR 


1 


Attribute byte 2 










Value 


Label 


Description 








X'01' 


$BCOPN 


File opened 








X'02' 


$BCACT 


File active 








X'04' 


$BCUSD 


File used 








X'08' 


$BCSWI 


Switched line 








X'10' 


$BCANS 


Answer line 








X'20' 


$BCMAN 


Manual line 








X'80' 


$BCMPT 


Tributary station 








X'88' 


$BCMCN 


Control station 


5 5 


$BDCHN 


2 


Chaining pointer to post open DTFs 


7 7 


$BDNXT 


2 


Chaining pointer to next DTF, preopen or post open 


9 9 


$BDWK1 


2 


Work area 


for MLMP routines 


B 11 


$BDWK2 


2 


Work area 


for MLMP routines 


D 13 


$BDWKB 


2 


Address of 


user's logical buffer 



Figure 11 (Part 1 of 4). BSC DTF 
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Displacement 
Hax Decimal 



Label 



Length 
in Bytes 



14 



$BDCMP 



1 



15 



$BDOPC 



11 17 



$BDMRL 



Description 



Completion codes 
Value Label 



X'OO' $BCREQ 
X'40' $BCDNE 
X'41' $BCUER 
X'42' $BCEOT 
X'43' $BCBID 
$BCNEG 
$BCNON 
$BCCRP 



X'44' 
X'45' 
X'46' 

X'47' $BCNDT 

X'48' $BCOLT 

X'49' $BCNAC 

X'4A' $BCIGN 

X'4B' $BCASC 

X'4C $BCNCN 

X'4D' $BCCAL 

X'4E' $BCLST 

X'4F' $BCERR 

X'50' $BCTIM 

X'5V $BCDAT 

X'52' $BCLOS 



X'53' $BCCON 

X'54' $BCRSP 

X'55' $BCADP 

X'56' $BCCMP 

X'57' $BCACD 

X'58' $BCRLE 



Operation codes 
Value Label 



X'40' 
X'41' 
X'42' 
X'44* 
X'80' 



$BOPUT 
$BOPEB 
$BOPEF 
$BOPEW 
$BOGET 



Description 

Request accepted 

Normal completion 

User error 

End of file 

Invalid ID 

Negative response to poll/address 

No response to poll/address 

Conversational reply pending 

No data for conversational GET 

(null message received) 

Invalid $RFT (request for online test) 

No active entry in polling list 

Request ignored 

Invalid ASCII character 

No connection 

Invalid request 

Delay count (DLYCTin $DTFB) 

exceeded 

Permanent error 

No response from remote device 

Data check 

Lost data or no RECSEP character within 

2 contiguous blocks of spanned records 

Lost connection or DISC received 

Invalid response received 

Adapter check 

No completion in check list 

No active DTFs in check list 

Maximum record length exceeded 



Description 

PUT 

PUT end-of-block 

PUT end-of-file 

PUT EOT to WACK response 

GET 



X'8V $BOGBK GET a block 



Maximum record length 



Figure 1 1 (Pert 2 of 4). BSC DTF 
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Displacement 
Hex Decimal 



Label 



Length 
in Bytes 



Description 



12 



18 



$BDADD 



1 



14 


20 


$BDDCH 


2 






$BDPSC 


2 






$BDLST 


2 


15 


21 


$BDDCC 


1 






$BDIND 


1 


17 


23 


$BDRID 


2 






$BDCNT 


2 


18 


24 


$BDRLN 


1 






$BDLID 


1 


1A 


26 


$BDSID 


2 


1B 


27 


$BDSLN 


1 


1D 


29 


$BDDLY 


2 


1F 


31 


$BDREL 


2 


21 


33 


$BDBKL 


2 


23 


35 


$BDI0B 


2 


25 


37 


$BDBKX 


2 


27 


39 


$BDITB 


2 


2A 


42 


$BDPRM 


3 



Attribute byte 

Value Label Description 

X'OT $BCAA1 Add on area on DTF 

X'02' $BCPOL Polling modules resident 

X'04' $BCOFL Truncate record indicator 

X'08' $BCRCL Span indicator for record length 

X'10' $BCTWO End of block indicator 

X'20/ $BCOPD File has been opened 

X'80' $BCSWD Switched ID list in use 

Address of dial number if this is a switched line, or 

Polling/addressing characters if this is for a tributary station, or 

Address of polling/addressing list if this is for a control station 
Length of dial number if this is for a switched line 

Polling/addressing list entry ID if this is for a control station 

Address of receive ID field or address of switched ID list if this 
is for a switched line 

List count (number of times to go through a polling list when 
all responses are negative) if this is for a control station 

Receive ID field length or switched ID list selection characters 

Last polling/address ID or last polling/addressing function 
(X'FO'orX'FV) 

Address of send ID field 

Length of send ID field 

Delay count (DLYCT in $DTFB) 

Record length 

Block length 

Address of IOB in process 

Pointer to data in BSCA buffer 

ITB character count 

Reserved 



Figure 11 (Part 3 of 4). BSC DTF 
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Displacement 
Hex Decimal 



2D 



45 



Label 



$BDRVI 



Length 
in Bytes 



2E 


46 


$BDNDX 


1 


30 


48 


$BDWKA 


2 


32 


50 


$BDINT 


2 


33 


51 


$BDDED 


1 


34 


52 


$BDAT1 


1 



35 


53 


$BDSEP 


1 


37 


55 


$BDSBF 


2 


39 


57 


$BDSRL 


2 


3B 


59 


$BDRFT 


2 


3D 


61 


SBDTSA 


2 



Description 



3F 


63 


$BDRL0 


2 


41 


65 


$BDRCL 


2 


43 


67 


$BDARA 


2 


44 


68 


SBDERR 


1 


46 


70 


$BDT1A 


2 


48 


72 


$BDEX@ 


2 


49 


73 


— 


3 



RVI (reverse interrupt request) mask and displacement. 
First byte is mask; next two bytes are address. Address 
must be valid. Mask must be zero if not used. 

Index for line initialization 

Address of BSC work area 

Disk address of line initialization module 

Work area for MLMP routines 

Terminal attribute byte 

Value Label Description 

X'01' $BCSEP Record separator used 

X'02' $BCSPN Spanned records used 

X'04' $BCNOW Spanning in process 

X'08' SBCPUT PUT span file 

X'10' $BCRES Restore after spanning 

X'40' SBCPLR Polling resident 

Record separator character 

Save area for user's logical buffer address 

Save area for record length 

Save area for address of online test parameter list 

Address of terminal statistics logging area 

The following are in the DTF only if core resi- 
dent polling, auto response, or user error retry 
count is present: 



For resident polling 

(POLRES-Y 

in$DTFB) 



Address of $$BSMA \ 

Address of $$BSMC > 

Address of $$BSMD ) 

Error retry count 

Disk address of online test module 

CCP user exit address (CCP only) 

Reserved (This field is present only if 
AUTORS-Y, POLRES-Y, or ERRCT-decdig 
was specified in $DTFB) 



Figure 11 (Part 4 of 4). BSC DTF 
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MLMP I/O Area 

The MLMP I/O area for a file is defined by the BUFST and 
BUFEND operands of $DTFB, or by the BUFNO operand 
of $DTFB. When the file is opened, MLMP formats the 
allocated I/O area into as many lOBs and buffers as the area 
can contain (see Figure 12). 

Note: Conversational files (CON V-Y in $DTFB) are per- 
mitted only one IOB and buffer. 



The length of each buffer, including the IOB, is calculated 
as follows: 

• Conversational mode: 

Buffer length = (record length x 2) + 28 

• Non-conversational mode: 

Buffer length = (record length x blocking factors) + C 
+ number of characters needed for ITB 



Chain 




Chain Chain 

Figure 12. MLMP Multiple Buffers 



The BSC IOB is 21 bytes long. The IOB controls the flow 
of data to and from the associated buffer. Each buffer 
contains one block of data as described in $DTFB (see 
Figure 13). 



IOB 

(21 

bytes) 



Acknowledgement 
to Preceding 
Block Received 



Receive 






Buffer 






S 




E E 


T 


. . Data . . 


TorT 


X 




X B 



1 Byte 
Reserved 
by MLMP 



"I 
Transmitted prior | 

to receiving data j 



IOB 

(21 
bytes) 


S 

T 
X 


. . Data . . 


Transmit 
Buffer 

E E 
Tor T 
X B 


Acknowledgement 
Received to Block 
Transmitted 


1 Byte 
Reserved 
by MLMP 










Received subs 
to transmittiri 


equent 
g data 



Figure 13. Sample MLMP Buffers 



Blocking factor = number of records per block 

C = 44 for ITB transparent PUT; 42 in all other cases 

Number of characters needed for ITB = (blocking 

factor - 1) x ITB count 
ITB count = for non-ITB 

1 for ITB non-transparent 
3 for ITB transparent GET 
5 for ITB transparent PUT 



If you want multiple buffers, double the computed buffer 
length to have double buffers, triple the computed buffer 
length to have triple buffers, etc. Multiple buffering uses 
a telecommunications line more efficiently than single 
buffering: you can be moving data to or from one buffer 
while data is being transmitted from or to another. 

Note: A conversational file (CON V-Y in $DTFB) cannot 
have multiple buffers. 



Terminal Statistics Logging Area 

The Terminal Statistics Logging Area is a table in main 
storage used by the terminal statistics logging routineto 
record terminal statistics for multipoint control stations. 
The table is addressed by the ERR LOG operand (required 
if you specify TYPE-CS) of $DTFB. You can use the 
$LOGB macro instruction to allocate the Terminal Statis- 
tics Logging Area. The format of the area is: 



Length of 
Table in Hex 



V 



Displacement 
to Next Avail- 
able Entry 



Entry 1 



Entry 2 



Entry n 



Two Bytes, Two Bytes, 
Defined by Initialized to 
User X'OO's by User 
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Each entry in the table is formatted by the terminal statis- 
tics logging routine: 



Pointer = Address of the first byte of the last entry in the 
table used by Trace (2 bytes). 



p 
p 


...c... 


Number of 
Errors 


Number of 
Successes 



pp = Number of polling or addressing characters (1 byte). 

C = Polling or addressing characters, as many as 7. 

Errors = Transmissions containing I/O errors (2 bytes). 

Successes = Successful transmissions (4 bytes). 

Space in main storage must be available for the table. The 
number of bytes required by the table (and entered as the 
length of the table in the first two bytes) is: 4 + p(7 + n) 
where: 

p = Number of unique sets of polling and addressing char- 
acters referenced in this program by this DTF. (If one 
terminal has both a set of polling characters and a set 
of addressing characters, two entries are required for 
the terminal.) 

n = Maximum number of polling or addressing characters 
per entry. 

If you define space in main storage for the Terminal Statis- 
tics Logging Area but you don't use $LOGB, specify the 
length of the entire table in the first two bytes of the table, 
and initialize the rest of the table to X'OO'. 

Note: If the area you define is not large enough to contain 
all the terminal statistics, MLMP will issue the Y6 halt. For 
a complete description of the Y6 halt, see the appropriate 
halt/messages manual listed in the Preface. 

Trace Table 

The trace table contains I/O information recorded by the 
trace module ($$BSTT). The trace table is 323 bytes long, 
beginning at symbolic address MTBSML and ending at sym- 
bolic address MTBSMM. The format of the trace table is: 



Pointer 



WRAP 



Entry 1 



Entry 2 



)[ 



Entry 20 



WRAP = Status byte: 

X'OO'-No more than 20 entries have been written to the 
the table. 

X'01'— Each entry has been filled at least once, and en- 
tries are now being overlaid, beginning with entry 
entry 1 . 

Entry = 16 bytes. The format of each entry is: 



Data 



Q Byte 


Control 
Code 


Sense , Bytes 


,01, 


. D2 . 


,D3, 


i 04 . 



Q Byte-From the BSCA SIO instruction initiating the 
event recorded. 

Control Code— From the SIO instruction initiating the 
event recorded; 1 byte. 

Sense/Status Bytes: 



Byte Bit Meaning When Set to 1 

1 Timeout status. 

a. A receive timeout occurred during a 
receive operation with the adapter 
in the busy state. 

b. An autocall operation was terminated 
by an abandon call and retry sig- 
nal from the autocalling unit, 
(ACU), indicating that a connec- 
tion was not established. 

1 1 Data check during receive operation. 

a. A BCC compare check occurred 
(EBCDIC). 

b. A VRC check occurred (ASCII). 
(Note: Characters having VRC 
checks are distinguished by a high- 
order bit in core storage. These 
characters are never recognized as 
control characters by the BSCA.) 

1 2 Adapter check during transmit 
operation. 

a. DBI register parity check. 

b. I/O cycle steal overrun. 



110 



Byte Bit 



2 
2 
2 
2 
2 
2 




1 
2 
3 
4 
5 



Meaning When Set to 1 

c. LSR or shift register parity check. 

d. Transmit control register check. 

Adapter check during receive operation. 

a. DBI register parity check. 

b. I/O cycle steal overrun. 

c. LSR or shift register parity check. 

Invalid ASCII character. (A byte 
fetched from core by an adapter using 
ASCII code contained a 1-bit in the 
high order bit position.) 

Abortive disconnect. Indicates BSCA 
on switched network was enabled, 
then the data set became ready, then 
not ready. This indicates the connec- 
tion has been released and causes 
data terminal ready to turn off. 

Disconnect timeout. Indicates dis- 
connect timeout occurred on a switched 
network. Disconnect timeout causes 
data terminal ready to turn off. 
(May not apply to systems using the 
IBM remote job entry program.) 
Note: The program must perform a 
disconnect operation. 

Not assigned. 



Not assigned. 



Data = 

D1 -Contents, at the time the I/O operation was started, 
of the byte addressed by the current address regis- 
ter (CAR) and the two bytes that follow. 

D2-Contents, at the time the I/O operation was started, 
of the three bytes preceding the byte addressed by 
the transition address register (TAR). 

D3— Contents, at the time the I/O operation was com- 
pleted, of byte addressed by the TAR and the two 
bytes follow. 

D4— Contents, at the time the I/O operation was com- 
pleted, of the three bytes preceding the byte address- 
ed by the CAR. 

Note: When a 2-second timeout occurs, D1-D4 are set to 
X'FF's. When a receive timeout occurs, D3 and D4 are 
set to X'FF'. When the I/O operation is receive-initial 
(RCVI), receive only (RCVO), or autocall, D2 and D3 are 
set to X'FF'. 



BSC I/O Registers 

Current Address 
Register (CAR) 
points 



Stop Address 
Register (SAR) 
points - 



Transmit 



Receive 



Transition Address^, 
Register (TAR)- 
points 



Interrupt 
generated 



Transmission proceeds until CAR equals TAR, when receive 
mode is entered. An interrupt is generated and the opera- 
tion is terminated if CAR equals SAR, if a line turnaround 
sequence is received, or if a timeout occurs. 



Data set ready. This indicates that the 
data set is ready to operate and that 
the BSCA has been enabled. 



For a complete description of the BSCA instruction set 
and the BSCA registers, see the appropriate components 
reference manual listed in the Preface. 



2 7 Data line occupied. This bit is used 

on a switched network when the BSCA 
is equipped with the autocall feature. 
This bit indicates that the data 
receive initial instruction will be re- 
jected. 

Note: Byte 1 equals leftmost byte; byte 2 equals rightmost 
byte. 



Checklist 

The format of the checklist entries created by the $CKL 

macro instruction is: 

Byte 1 = Status byte: 

X'80'- Skip this entry 

X'40'— This is a printer-keyboard request DTF 

X'20'— This is the last entry in the checklist 
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X'10'— Return control to user if no completed 
events (significant in the first check- 
list entry only) 

X'04'— Program function key not available 

Bytes 2-3 = Symbolic address of the DTF for this entry 
The format of the checklist is: 



Entry 1 Entry 2 (( Entry n 



ESn = Entry selection characters, X'OO' through X'EF' 

L = Number of station identification characters 

Sin = Station identification characters, as many as 15 

ST = Status byte: 

X'80'— Inactive entry 
X'OO'-Active entry 

END = End byte: X'FF' 



See also index entry generate a checklist ($CKL). 



Polling/ Addressing List 

The format of the entries generated by the $POLB macro 
instruction is: 

One Entry 



i |p |c |s 


I |p|C 


I s 




I |p|C 


Is 


E 


Dp 1 T 


D'p 2. 


T 


I 


Dp n. 


.T 


N 


1 l I I 


A I 


I 


w 


"I I 


I 


D 



IDn = Terminal identification, X'OO' through X'EF' 

pp = Number of polling or addressing characters 

Cn = Polling or addressing characters, as many as 7 

ST = Status byte: 

X'80'— Inactive entry 
X'OO'-Active entry 

END = End byte: 

X'FE'-Open list 
X'FF'-Wrap list 

See also index entry generate a polling or addressing list 
($POLB). 



Switched ID List 

The format of the entries generated by the $SWIB macro 
instruction is: 



One Entry 












e| |s |s 


e| Is 


Is 1/ 


El |S 


| S 


E 


S L I . . . T 


S LI.. 


T 


s'l 'i.. 


. 't 


N 


1 l V I 


2||2 


! \ 


n| |n 


1 


D 



Parameter List for Changing a Polling List or Switched 
ID List 

The format of the parameter list generated by the $CHGB 
macro instruction is: 



Type 


DTF 

Address 

1 


1 
N ...Chars... 



Type 



BitO: 



Bit 1: 



DTF 
Address: 



N: 



Chars: 



Off— activate selected entries 
On— deactivate selected entries 

Off— select only those entries whose 
characters match the characters specified 
in the Chars field (below) 
On— select only those entries whose first 
N characters match the first N characters 
specified in the Chars field (below), 
where N is the number specified in the N 
byte (below) 



Address of the DTF whose polling list or 
switched ID list is to be changed. 

Hexadecimal number of characters in the 
Chars field (below) to be compared to 
characters in polling list or switched ID 
list entries. 

Hexadecimal representation of characters 
to be compared to characters in polling 
list or switched ID list entries. 



See also index entries $BCPL macro instruction and $CHGB 
macro instruction. 
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Translate Parameter List 

The translate parameter list is used by the $TRAN macro 
instruction to translate data. See also index entry generate 
an interface to the translate routine ($TRAN). 



Field 
Length 



2 
2 

2 
1 



Field Description 

Address of translate table generated by the 
$TRTB macro instruction (see index entry 
$TRTB macro instruction) 

FROM field for translation 

TO field for translation 

Number of bytes to translate 

Return Code 

X'OO'— translation complete, no errors 
X'FF'— invalid character detected 



Online Test Parameter List 

The format of the online test parameter list required by 
the $RFT macro instruction is: 



X 


X 


Y I Y 


N 


Address 



XX = Decimal number specifying test type. Of the follow- 
ing test types, System/3 can only request types 00, 
01, 06, and 14. (When requesting an online test, be 
sure to specify a test the remote terminal can accept.) 
System/3 can accept all of the following test types. 
(Types 23 through 34 are only accepted from a 3270.) 



Test 
Type 

00 



01 



Description 

Receive and acknowledge the test message 
the number of times specified in bytes YY. 
The formatted test request must not be 
more than 300 characters long. See index 
entry online test requests. 

Transmit the test message the number of 
times specified in bytes YY. The formatted 
test request must not be more than 300 
characters long. See index entry online 
test requests. 



Test 
Type 

06 



14 



23 



24 



25 



26 



27 



Description 

Transmit 36 alphameric characters, A-Z and 
0-9, the number of times specified in bytes 
YY. Transmit the characters in ASCII 
(ASCII adapter only). 

Transmit 36 alphameric characters, A-Z and 
0-9, the number of times specified in bytes 
YY. Transmit the characters in EBCDIC 
(EBCDIC adapter only). 

3270 basic EBCDIC test message: 

This test checks all alphameric characters at 
a display station or printer. It also checks 
the use of the WCC to sound the audible 
alarm and allows attribute field specifications 
to be checked at a display station. It starts 
a printer, printing only 40 characters to a 
line. 

3270 Model 1 align EBCDIC test pattern: 

This test checks position alignment for the 
480-character display station. It also checks 
the WCC to sound the audible alarm. It 
starts a printer, printing 40 characters to a 
line. 

3270 Model 2 align EBCDIC test pattern: 

This test checks position alignment for the 
1920-character display station. It also checks 
the WCC to sound the audible alarm. It 
starts a printer, printing 80 characters to a 
line. 

3270 orders EBCDIC test message: 

Tests 3270 orders (SF, SB A, etc.), checks 
the WCC to sound the audible alarm, and 
uses display and intensified brightness. It 
starts the printer, printing 64 characters to 
a line. 

3270 EBCDIC universal character set test 
pattern: 

This test uses the erase/write command, 
displaying the universal character set in 
EBCDIC. It checks the WCC to start the 
printer, sounds the audible alarm (on a dis- 
play), and prints 132 characters per line on 
the printer. NIL and EM are also tested on 
a printer. Display intensity is used. The 
SF, NL, EM, and IC orders are used. 
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Tett 
Type 

28 



29-34 



Description 

3270 NL/EM EBCDIC test pattern: 

This test is mainly intended to test the end 
of message (EM) order and multiple new 
line (NL) orders on the printer. The WCC 
is checked to start the printer, sound the 
alarm (on a display), and print 132 char- 
acters to a line on the printer. 

3270 ASCII test patterns: 

These tests correspond to tests 23-28 except 
that transmission is in ASCII. 



YY = Decimal number specifying the number of times to 
transmit or receive the test message. 

N = Decimal number specifying the number of addressing 
characters (0-7). N equals except when a tributary 
station requests a test other than type 00. 

Address = Addressing characters to be used, not more than 
7. 

Note: Decimal numbers and addressing characters must 
be given in the code used by the BSCA (EBCDIC or 
ASCII). 

The message type specified determines the buffer space 
required to transmit or receive an online test request. In 
ail cases, block length specified for System/3 (BLKL in 
$DTFB) must be equal to or greater than the test message 
length (LEN in $RFT), whether System/3 is sending or 
receiving the online test request. 



Multipoint lines: 

Tributary station: 
BLKL = 7 + m + n 

Control station: 

BLKL -11 +m + 2n 

Message types 06 and 14 

BLKL must be greater than or equal to 40. 
Message types 23-34 

BLKL must be greater than or equal to 300. 

Online Tett Requests 

Online test requests are written as follows: 

• Test type 01 

Given the online test parameter list and a test message, 

PARM Operand 
of$RFT 1 

[Online Test Parameter List | 



FROM Operand 
of $RFT 1 






S 


Test 


E 


L 


T 


. . .Characters. . . 


T 


E 


X 




X 



For Transparency Only 



Where m = test message length, including framing char- 
acters (see index entry online test requests), 
and 
n = number of addressing characters, 

the minimum BLKL required to send or receive an online 

test request is: 



Message type 00 

BLKL = 9 or m, whichever is greater 
Message type 01 

Point-to-point nonswitched and switched lines: 
BLKL = 7 + m 



MLMP constructs and transmits the following online 
test request: 

300 Bytes Maximum 



s 




Online Test 


D 


S 


Txt 


E 





% 


Parameter List 


L 


T 


. . .Characters. . . 


T 


H 






E 


X 




X 



V 



Inserted by 
MLMP 
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All test types other than 01 

Given the online test parameter list. 



FARM Operand 
of$RFT 1 

jOnline Test Parameter Li$t| 



MLMP Message Formats 

MLMP builds and recognizes the following message 
formats: 



• Non-ITB, non-transparent 



MLMP constructs and transmits the following online 
test request: 



s 




Online Tett 


S 


E 





% 


Parameter List 


T 


T 


H 






X 


X 



V 



Inserted by 


Inserted 


MLMP 


by MLMP 




(test message) 



Note: The parameter list and the test message must both 
be given in the appropriate line code, EBCDIC or ASCII 
(translation may be required— see index entries generate a 
translate parameter list ($TRL) and generate an interface 
to the translate routine ($TRAN)). 



s 




E E 


T 


Text 


T or T 


X 




X B 



• Non-ITB, text transparency 



D 


S 




E E 


L 


T 


Text 


T or T 


E 


X 




X B 
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• ITB, non-transparent 



s 




I 




I 


J J 


I 




E E 


T 


Record 1 


T 


Record 2 


T 


Record n-1 


T 


Record n 


T or T 


X 




B 




B 


cc 


B 




X B 



ITB, text transparency 



D 


S 




I 


D 


S 


J) 


i 


D 


S 




E E 


L 


T 


Record 1 


T 


L 


T 


Record n-1 


T 


L 


T 


Record n 


T or T 


E 


X 




B 


E 


X 


cr 


B 


E 


X 




X B 



Spanned records can be used with or without ITB, and 
can be transparent or non-transparent. The following for- 
mat shows spanned records— non-ITB, text transparency: 



D 

L 
E 


S 
T 
X 


Record 1 


R 
S 


Record 2 


R 
S 


Rec 


E 
T 
B 



D 

L 
E 


S 
T 
X 


ord 3 


R 
S 


Record 4 


R 
S 


Recor 


E 
T 
B 



D 

L 
E 


S 

T 
X 


d5 


R 
S 


Record 6 


R 
S 


E 
T 
B 



RS = Record separator 
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Appendix D. Control Characters and Codes 



EBCDIC 














































Main Storage Bit Positions 0, 1 


2,3 








Main Storage 
Bit Position* 


0000 


0001 


0010 


0011 


0100 


0I01 


OHO 


Olll 


1000 


1001 


1010 


1011 


1100 


1101 


1110 


nu 


4, 5, 6, 7 


Hex 





1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


c 





E 


F 


0000 





NUL 


DLE 


DS 




5P 


& 


- 












( 


) 


\ 





0001 


1 


SOH 


DC1 


SOS 








/ 




a 


J 


^ 




A 


J 




1 


0010 


2 


5TX 


DC2 


FS 


SYN 










b 


k 


s 




B 


K 


S 


2 


001 1 


3 


ETX 


DC3 














c 


1 


t 




C 


L 


T 


3 


0100 


4 


PF 


RES 


BYP 


PN 










d 


rn 


u 




D 


M 


U 


4 


0101 


5 


HT 


NL 


LF 


RS 










e 


n 


V 




E 


N 


V 


5 


0110 


6 


LC 


BS 


eob/ 


UC 










f 


o 


w 




F 


O 


W 


6 


0111 


7 


DEL 


IL 


pre/ 
/esc 


EOT 










9 


P 


X 




G 


P 


X 


7 


1000 


8 




CAN 














h 


q 


y 




H 


Q 


Y 


8 


1001 


9 


RLF 


EM 












\ 


< 


r 


z 




1 


R 


z 


9 


1010 


A 


SMM 


CC 


SM 




* 


I 


I 
I 




















1011 


S 


VT 










I 


' 


I 


















1100 


C 


FF 


IFS 




DC4 


< 


- 


% 


(V 


















1101 


D 


CR 


IGS 


ENQ 


NAK 


( 


) 





• 


















1110 


E 


SO 


IRS 


ACK 




+ 


; 


> 


= 


















mi 


F 


SI 


IUS 


BEL 


SUB 


1 


— i 


? 


« 



















Duplicate Assignment 
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ASCII 









Main Storaga Bit Poaitiona 0, 1, 2. 3 


Main Storaga 
Bit Poaitiona 
4. 5. 6, 7 




0000 


0O0I 


0010 


001 1 


0100 


0101 


0110 


01 II 


1000 


1001 


1010 


101 1 


1100 


1 1 01 


1110 


llll 


HEX 





I 


2 


3 


4 


5 


i 


7 


8 


9 


A 


B 


C 


D 


E 


F 


0000 





NUL 


DLE 


SP 





<§, 


P 


\ 


P 


















0001 


1 


SOH 


DCI 


I 


1 


A 


Q 


a 


<) 


















0010 


2 


STX 


OC2 


•• 


2 


B 


R 


b 


r 


















0011 


3 


ETX 


DC3 


# 


3 


C 


S 


c 


s 


















0100 


4 


EOT 


DC4 


i 


4 





T 


d 


t 


















0101 


5 


ENQ 


NAK 


% 


5 


E 


U 


e 


u 


















ono 


6 


ACK 


SYN 


& 


6 


F 


V 


f 


V 


















01 II 


7 


BEL 


ETB 


• 


7 


G 


w 


9 


w 


















1000 


8 


BS 


CAN 


( 


8 


M 


X 


h 


X 


















1001 


9 


HT 


EM 


) 


9 


1 


Y 


i 


y 


















1010 


A 


LF 


SUB 


* 




J 


z 


i 


z 


















1011 


B 


VT 


ESC 


+ 


; 


K 


: 


k 


{ 


















1100 


C 


FF 


FS 


, 


< 


L 


\ 


1 


1 

1 


















1101 


D 


CR 


GS 


- 


= 


M 


i 


m 


} 


















1110 


E 


SO 


RS 




> 


N 


— i 


n 


~ 


















mi 


F 


SI 


US 


/ 


? 


O 


_ 


o 


DEL 
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Hexadecimal Representations 



ASCII 



BSC control characters are represented by the foil 
values: 



owing 



Polling Hexadecimal Addressing 
Character Representation Character 



EBCDIC 



ASCII 



ACKO 


X'1070' 


X'1030' 


ACK1 


X'1061' 


X'1031' 


DISC 


X'1037' 


X*1004' 


DLE 


X'10' 


X'10' 


ENQ 


X'2D' 


X'05' 


EOT 


X'37' 


X'04' 


ETB 


X'26' 


X'17' 


ETX 


X'Q3' 


X'03' 


ITB 


X'1F' 


X'1F' 


NAK 


X*3D' 


X'15' 


RVI 


X'107C 


X'103C 


SOH 


X'01' 


x'or 


STX 


X'02' 


X'02' 


SYN 


X'32' 


X'16' 


TTD 


X'022D' 


X'0205' 


WACK 


X'106B' 


X'103B' 



Tributary System/3 Polling and Addressing Characters 

Polling and addressing characters must be used in pairs: 
that is, once a polling character is selected, the complemen- 
tary addressing character is determined; once an addressing 
character is selected, the complementary polling character 
is determined. 

EBCDIC 



AA 

BB 

CC 

DD 

EE 

FF 

GG 

HH 

II 

JJ 

KK 

LL 

MM 

NN 

00 

PP 

QQ 

RR 

SS 

TT 

UU 

VV 

WW 

XX 

YY 

ZZ 



4141 

4242 

4343 

4444 

4545 

4646 

4747 

4848 

4949 

4A4A 

4B4B 

4C4C 

4D4D 

4E4E 

4F4F 

5050 

5151 

5252 

5353 

5454 

5555 

5656 

5757 

5858 

5959 

5A5A 



aa 
bb 
cc 
dd 
ee 
ff 

gg 

hh 
ii 

jj 

kk 

II 

mm 

nn 

oo 

PP 

qq 

rr 
ss 
tt 
uu 
vv 

WW 

xx 

yy 

2Z 



Hexadecimal 
Representation 

6161 

6262 

6363 

6464 

6565 

6666 

6767 

6868 

6969 

6A6A 

6B6B 

6C6C 

6D6D 

6E6E 

6F6F 

7070 

7171 

7272 

7373 

7474 

7575 

7676 

7777 

7878 

7979 

7A7A 



Polling Hexadecimal Addressing 

Character Representation Character 



BB 

CC 

DD 

EE 

FF 

GG 

HH 

II 

JJ 

KK 

LL 

MM 

NN 

00 

PP 

QQ 

RR 



C2C2 
C3C3 
C4C4 
C5C5 
C6C6 
C7C7 
C8C8 
C9C9 
D1D1 
D2D2 
D3D3 
D4D4 
D5D5 
D6D6 
D7D7 
D8D8 
D9D9 



SS 

TT 

UU 

VV 

WW 

XX 

YY 

ZZ 

11 

22 

33 

44 

55 

66 

77 

88 

99 



Hexadecimal 
Representation 

E2E2 
E3E3 
E4E4 
E5E5 
E6E6 
E7E7 
E8E8 
E9E9 
F1F1 
F2F2 
F3F3 
F4F4 
F5F5 
F6F6 
F7F7 
F8F8 
F9F9 
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Appendix E. Macro Instruction Summary 













Approximate 


Approximate 












Number of 


Number of 












Instruction* 


Bytes 


Macro 










Generated, 
Excluding 


Required, 
Excluding 


1 net ruction 


Format 






Function 


Mnotas 


Mnotes 


$ALOC 
$BCPL 




[name) 


$ALOC 


[DTF— name] 


ill 


Allocates files. 
Changes entries in 


3 
39 


9 

109 




] [name] 


| $BCPL 


| [PARM-addres. 










polling lists. 






$BCSW 




| [name] 


J $BCSW 


I [PARM-addres 


s]| 


Changes entries in 
switched ID lists. 


43 


113 








SCANB 


I [name! 


j $CANB 


j [DTF-address] | 


Cancels an initial 
GET request. 


25 


82 


$CHGB 




[name] 


$CHGB 


TYPE-AM/AN/DM/DN,DTF-address, 
NUM-hex,CHARS-hex 


Generates a parameter 
list for changing 
polling or switched 


(6 lines) 


6-12 


















ID lists. 






$CHK 




[name] 


I $CHK 


j [CKL-address] 


1 


Checks for I/O 
completion. 


2 


8 








$CKL 
(Model 

10) 




[name] 


$CKL 


DTF-address LSKIP-Y/NJ 




Creates entries in 


(3 lines) 


3 








[,REQK-Y/N or .CONS-Y/N] 




the check list. 






$CKL 
(Model 
15) 








[.RTN-Y/N] [.LAST-Y/N] 




Creates entries in 
the check list. 


(3 lines) 


3 


[name] 


$CKL 


DTF-address [.SKIP-Y/NJ 
[.REQK-Y/N] 


$CLOS 
$COMN 








[.RTN-Y/N] [,LAST-Y/N] 




Closes files. 

Generates 
common labels. 


3 

(14 lines) 


9 



[name] 


$CLOS 


[DTF-address] 








$COMN 


I 












$DTFB 




[name] 


$DTFB 


RECL-decdig,BLKL-decdig. 

RCAD-address,FTYP-RCV/TSM 

[,BUFST-address,BUFEND-address] 

[.BUFNO-decdig] 

[.CODE-E/A] [, LINE- 1/2] 

[.UP-binary/qi [.CHN-name] 

[.CONV-Y/N] [.ITB-Y/NJ 

[.TRANSP-Y/NJ 

[,RVIADR-address,RVIMSK-hex] 

[.DLYCT-decdig] 

[.TYPE-PP/MP/CS/AC/MC/AA/MA] 

[,TERMAD-hex] [.AUTORS-Y/N] 

[.LISTAD— address, ERR LOG— address] 

[.POLRES-Y/N] 

[.LIMIT-decdig] 

[,DIAL-address,DIALCT-decdig] 

[.RCVID-address.RCVCT-decdig/ 

,SWLIST-Y/N] 

[.SNDID-address.SNDCT-decdig] 

[.SPAN-Y/NJ 

[.RECSEP-hex] [,ERRCT-decdig] 


Define BSC DTFs. 


(31 lines) 


62 







Figure 14 (Part 1 of 2). Macro Instruction Summary Chart 
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Macro 
Instruction 



Format 



Function 



Approximate 

Number of 

Instructions 

Generated, 

Excluding 

Mnotes 



Approximate 

Number of 

Bytes 

Required, 

Excluding 

Mnotes 



$DTOB 

$GETB 
$LOGB 

$OPEN 
$POLB 

$PUTB 

$RFT 
$RFTL 

$SNAP 

$SWIB 

$TRAN 
$TRL 

$TRTB 



name] $PUTB 



[name] 



[name] 



[name] 



[name] 



$DTOB 



[name] 


$GETB 


[DTF-address] [,REJECT-eddress] 
LOPC-N/BLK] 


[name] 


$LOGB 


NUM-decdig,LEN-decdig 





[name] 


$OPEN 


[DTF-name] | 


[name] 


$POLB 


ID-hex,TERMAD-hex, 
LEN— decdig 
[,LAST-N/OPEN/WRAP] 



[DTF-address] 

[.REJECT-address] 

[,OPC-N/EOB/EOF/EOW] 



$RFT 



PARM-address [,FROM-address] 
[,LEN-decdig] [,DTF-address] 
[.REJECT-address] 



[name] $RFTL 



TYPE-00/01/06/14, 
NUM-decdig.LEN-decdig 
[.CODE-E/A) [,TERMAD-hex] 



$SNAP 



I D-hex,START-address, 
END-address 



$SWIB 



SELECT-hex,STATID-hex, 
LEN-decdig [.LAST-Y/NJ 



[name] 


$TRAN 


[TRL-eddress] | 


[name] 


$TRL 


TO -address, F R OM— address, 
LEN— decdig,TRT— address 



$TRTB 



[CODE-E/A] [,HEX-hex] 



Generates 
displacements and 
labels for BSC 
DTFs. 

Instructs Model 10 
BSC to receive 
(GET) data. 

Allocates the 
Terminal Statistics 
Logging Area. 



Opens files. 

Creates entries in 
polling and 
addressing lists. 



Instructs 
Model 10 BSC 
to transmit 
(PUT) data. 

Instructs 
Model 10 BSC 
to perform an 
online test. 

Generetes the online 
test parameter list. 



Dumps main storage. 



Creates entries in a 
switched ID list. 

Translates data. 

Creates a 
translate list. 



Generates a translate 
table. 



(137 lines) 

31 

(5 lines) 

3 

(5 lines) 

26 
25 
(5-6 lines) 

(4 lines) 

(3-6 lines) 

8 

(13 lines) 



If CODE-A, 
12 lines; if 
CODE-E, 
20 lines. 



94 



Depends on the 
number of termi- 
nals and number 
of polling/addres- 
sing characters. 
9 

4 (plus 

poll/addressing 

characters) 



77 

86 
7-12 

10 

3-18 

8 
9 



If CODE-A, 
1 30 bytes; if 
CODE-E, 
258 bytes. 



Figure 14 (Part 2 of 2). Macro Instruction Summary Chart 
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Index 



[ ] halt 30, 45 

$$BSCN (form descriptor convert routine) (see FDP/convtrt) 

$$BSFI (MLTERFIL initialization modula) 50 

$$BSMS, EXTRN 9, 57 

$ALOC macro instruction 

description 1 6 
format 1 6 

summary 121 
$BCPL macro instruction 

description 20 

format 20 

summary 121 
$BCSW macro instruction 

description 23 

format 23 

summary 1 21 
$CANB macro instruction 

description 29 

format 29 

summary 121 
$CHGB macro instruction 

description 21 

format 21 

summary 121 
$CHK macro instruction 

(see also $CKL macro instruction) 

description 29 

format 29 

summary 121 
$CKL (Model 10) macro instruction 

description 17 

format 1 7 

summary 121 
$GKL (Model 15) macro instruction 

description 18 

format 18 

summary 121 
$CLOS macro instruction 

description 39 

format 39 

summary 121 
$COMN macro instruction 

description 10 

format 10 

summary 121 
$DTFB macro instructions 

considerations 15 

description 10 

format 10 

summary 1 21 
$DTOB macro instruction 

description 10 

format 10 

summary 122 
$GETB macro instruction 

description 27 

format 27 

summary 1 22 



$L0GB macro instruction 
description 21 
format 21 
summary 1 22 
$OPEN macro instruction 
description 17 
format 17 
summary 1 22 
$POLB macro instruction 
description 19 
format 19 
summary 1 22 
$PUTB macro instruction 
description 28 
format 28 
summary 122 
$RFT macro instruction 
(see also online test) 
description 51 
format 51 
summary 1 22 
$RFTL macro instruction 
(see also online test) 
description 26 
format 26 
summary 1 22 
$SNAP macro instruction 
description 55 
format 55 
summary 1 22 
$SWIB macro instruction 
description 22 
format 22 
summary 122 
$TRAN macro instruction 
description 25 
format 26 
summary 122 
$TRL macro instruction 
description 24 
format 24 
summary 1 22 
$TRTB macro instruction 
description 24 
format 24 
summary 122 



Index 123 



accepting an online test request 51 , 53 

activating a polling list entry 19, 20 

address (control stations) 31 

addressing considerations 32 

addressing/polling (see polling/addressing) 

addressing/polling characters (see polling/addressing characters) 

addressing/polling list (see polling/addressing list) 

allocate BSC files ($ALOC) 1 6 

allocate the terminal statistics logging area ($LOGB) 21 

ASCII 

control characters and codes 118, 119 

line code 6,12 

polling/addressing characters 119 
autoanswer 6, 13 
autocall 6,13 



Banking Terminal System, 2972 (see MLMP, device-dependent 

considerations) 
binary data 57 

binary synchronous communications (see BSC) 
Binary Synchronous Communications Adapter (tee BSCA) 
binary synchronous data 1 , 5 
block length 

considerations 16 

for conversational files 12 

specifying 11 
blocking and deblocking data 

and move mode 27 

specifying in $GETB 28 

specifying in $PUTB 28 
BSC (binary synchronous communications) 1 
BSC counters 50 
BSC DTF 

format 1 05 

generation of by $DTFB 9,10 

in MLMP overview 4 

label generation 9 
BSC I/O registers 111 
BSC line conventions and conversational replies 34, 35 

(see also control characters and codes) 
BSC M LMP networks, examples of 1 
BSCA (Binary Synchronous Communications Adapter) 

in MLMP overview 4 

line code 6, 12 

requirement 1,57 
BSCA SIO sense/status bytes 110 
BSCA terminal log area 50 
buffers 

and move mode 27 

calculating length of 109,110,114 

defining 1 1 

in MLMP I/O area 109 

in MLMP overview 4 

sample 109 



calculating buffer length 109, 1 10, 114 
cancel a GET request ($CANB) 29 
chained DTFs 

allocating 17 

closing 39 

opening 17 

specifying 12 
change a polling list ($BCPL) 20 
change a switched ID list ($BCSW) 23 
check for I/O completion ($CHK) 29 
check routine 29 

check routine completion codes 45, 47 
checklist 

(see also $CHK) 

format 1 1 1 

generation of by $CKL 17 
close BSC files ($CLOS) 39 
closing a conversational file 34 
completion code 45 
completion message 30 
considerations 

$DTFB 15 

addressing 32 

closing files 34, 39 

device-dependent (see MLMP, device-dependent considerations) 

FDP/convert 77 

MLMP programming 57 

online test 71 

trace 54 

3270 online test 71 
console DTF 18,30 
control characters and codes 

ASCII 118,119 

EBCDIC 117,119 

tributary System/3 polling and addressing characters 119 
control mode 32 

conventions for describing System/3 macro instructions 7 
conversational files 

and move mode 27 

closing 34 

specifying 12 
conversational replies 28, 29, 33 



124 



data 

binary 57 

binary synchronous 1 , 5 

packed decimal 57 

translation (see data translation) 
data areas, parameter lists, and message formats 105 
data transfer 

initiating 27 

preparing for 9 

terminating 39 
data translation 5,9 

(see also $TRAN macro instructions; $TRL macro instruction) 
data-link control characters and codes 117 
deactivating a polling list entry 20 
define the file for BSC ($DTFB) 10 
delay count 12 

description of System/3 macro instructions 7 
device-dependent considerations (see MLMP, device-dependent 

considerations) 
diagnostics and diagnostic aids 40 
dial number, specifying for autocall 15 
display adapter 76 
DPF (dual programming feature) 1, 30 
DTF (see BSC DTF) 

(see also $CKL macro instruction) 
dual programming feature (DPF) 1 , 30 
dump routine 6 

(see also $$SNAP macro instruction) 



FDP (form descriptor program) (see FDP/convert) 
FDP/convert 

considerations 78 

description 4, 77 

expanded 96-column to consecutive 5444 disk 78 

80-column to consecutive 5444 disk 78 

80-column to 96-column 77 
fixed length records (see record type, fixed length) 
form descriptor convert routine ($$BSCN) (see FDP/convert) 
form descriptor program (FDP) (see FDP/convert) 
functional control and data flow of MLMP 4 
functions of MLMP 6,9 



generate a checklist ($CKL) 1 7 

generate a parameter list for changing a polling list or a 

switched ID list ($CHGB) 21 
generate a polling/addressing list ($POLB) 19 
generate a switched ID list ($SWIB) 22 
generate a translate parameter list ($TRL) 24 
generate a translate table ($TRTB) 24 
generate an interface to the translate routine ($TRAN) 25 
generate an online test parameter list ($RFTL) 26 
generate BSC DTF displacements and labels ($DTOB) 10 
generate common equates ($COMN) 10 
generation of a user MLMP object program 2 
GET request (see $GETB macro instruction) 



EBCDIC 

control characters and codes 117,119 

line code 6,12 

polling/addressing characters 119 

transparency 6 
end -of-b lock 

for conversational files 33, 34 

for 3270 data 70 

specifying in $PUTB 28 
end-of-file 

and terminating data transfer 39 

for conversational files 34 

for 3270 data 69 

specifying in $PUTB 29 
EOT in response to ACK or WACK 29 
error recording 5, 40 
error recovery 5, 45 
error retry count 15 
error statistics 50 
establishing line connection 27 
examples 

continuation lines 8 

macro instructions 77 

MLMP BSC networks 1 

MLMP buffers 109 

3270 program 87 
EXTERNs 

$$BSMS 9, 57 

$$BSTT 54 

MTBSML 54 

MTBSMM 54 



halts 45 

how to request an online test from a 3270 



109 



71 



2,57 



I/O area, MLMP 
I/O buffers 

defining' T1 

in MLMP I/O area 109 

in MLMP overview 4 
I/O registers, BSC 111 
I/O requests completion code 45, 46 
I/O routines, MLMP 4 
IBM System/3 macros feature 2,57 
IBM System/3 overlay linkage editor 
including trace 

assembler 54 

RPG II 54 
Information Display System 3270 (see MLMP, device-dependent 
considerations) 

(see also 3270 sample program) 
initial GET 29, 32 
initializing MLTERFIL 50 
initiating data transfer 27 
intermediate block checking (ITB) 5, 12 
intermixing of terminals, restriction 4 
IOB 

defining 1 1 

in MLMP I/O area 109 

in MLMP overview 4 
issue a GET request ($GETB) 27 
issue a PUT request ($PUTB) 28 
ITB (intermediate block checking) 6, 12 
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leading graphics 6 

line 

code, specifying 12 
supported by MLMP 5 
type, specifying 13 
1 or 2 specifying 12 

local display adapter 76 

logical buffer 

in MLMP overview 4 
specifying 1 1 



machine requirements, MLMP 57 

macro instructions 

$ALOC (see $ALOC macro instruction) 
$BCPL (see $BCPL macro instruction) 
$BCSW (see $BCSW macro instruction) 
$CANB (see $CANB macro instruction) 
$CHGB (see $CHGB macro instruction) 
$CHK (see $CHK macro instruction) 
$CKL (see $CKL macro instruction) 
$CLOS (see $CLOS macro instruction) 
$COMN (see $COMN macro instruction) 
$DTFB (see $DTFB macro instruction) 
$DTOB (see $DTOB macro instruction) 
$GETB (see $GETB macro instruction) 
$LOGB (see $LOGB macro instruction) 
$OPEN (see $OPEN macro instruction) 
$POLB (see $POLB macro instruction) 
$PUTB (see $PUTB macro instruction) 
$RFT (see $RFT macro instruction) 
$RFTL (see $RFTL macro instruction) 
$SNAP (see $SNAP macro instruction) 
SSWIB (see $SWIB macro instruction) 
$TRAN (see $TRAN macro instruction) 
$TRL (see $TRL macro instruction) 
$TRTB (see $TRTB macro instruction) 
description of System/3 7 
examples 79 
in MLMP overview 4 
summary chart 121 

macro processor 2, 57 

manual answer 6 

manual call 6 

message formats 
completion 30 
MLMP 115 
online test 114 

message formats, data areas, and parameter lists 105 

MLMP (Multiline/Multipoint) 
BSC networks, examples of 1 
buffers (see buffers) 
device-dependent considerations 

IBM 2972 Banking Terminal System 61 
IBM 3270 Information Display System 61 
IBM 3735 Programmable Terminal 77 
diagnostics and diagnostic aids 41 
error recordings 41 
error recovery 45 
error statistics 50 
examples (see examples) 
functional control and data flow 4 
functions 6, 9 
I/O area 109 



MLMP (Multiline/Multipoint) (continued) 

I/O routines 1 , 4 

introduction 1 

lines supported 5 

macro instructions (see macro instructions) 

message formats 115 

mnotes 41 

networks, examples of 1 

object program, generation of 2 

programming 

considerations 57 
examples (see examples) 
initiating data transfer 27 
preparing for data transfer 9 
terminating data transfer 39 

requirements and considerations 57 

statistics 50 

telecommunications lines supported 5 

terminal statistics 50 

terminal supported 5 
MLTA (Multiple Line Terminal Adapter) 6 
MLTERFIL 50 

(see also terminal statistics logging area) 
mnotes 41 
move mode 27 
MTBSML, EXTRN 54 
MTBSMN, EXTRN 54 
Multiline/Multipoint (see MLMP) 
multiple buffers 109 
Multiple Line Terminal Adapter (MLTA) 6 



networds, examples of MLMP BSC 1 

no completion in checklist, specifying return on 18 

nonconversational files and move mode 27 



object program, generation of MLMP 2 
OLT (see online test) 
online test (OLT) 

accepting a request for 51 , 53 

calculating buffer space 114 

considerations 53 

discussion 51 

from a 3270 71 

message format 115 

parameter list 1 1 3 

requesting 51 

requests 114 

results 53 

test types 51 , 114 
open BSC files ($OPEN) 17 
open polling list, specifying an 20 
opening a DTF conditionally 12 
overlay linkage editor 

and trace 54 

in generating an MLMP object program 2 

requirement 57 
overview of MLMP 4 



126 



packed decimal data 57 
parameter list 

for changing a polling list or switched ID list 112 

online test 113 

translate 113 
parameter lists, message formats, and data areas 105 
poll (control stations) 31 
polling/address list 

changing a 20, 21 

format 112 

generation of 19 

identifying a 14 

specifying entry IDs for a 19 
polling/addressing 

and 3270 59 

initiate 31 

respond to 32 
polling/addressing characters 

ASCII 119 

EBCDIC 119 

specifying 19 
preparing for data transfer 9 
program level 1 
programmable terminal, 3735 (see MLMP, device-dependent 

considerations) 
programming considerations, MLMP 57 
programming requirements, MLMP 57 
PUT request (see $PUTB macro instruction! 



RCVI (receive-initial) 32 

reading from and writing to a remote 3270 

receive 

(see also $GETB macro instruction! 

a block of data at a time 28 

file, specifying a 11 

interspersed with transmit only 33 

to a conversational file 33 

with transmittal of a conversational reply 
receive-initial (RCVI) 32 
recognizing an online test request 51 , 53 

(see also online test) 
record length 

considerations 15 

specifying 1 1 
record separator 15, 116 
record type 
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fixed length 15 

spanned 

considerations 
format 116 
specifying 15 
supported 5 

variable length 5, 



15 



15 



reject routine 

for $GETB 27 

for $PUTB 28 

for$RFT 51 
REQkey 17,30 
requesting an online test 51 , 53 
requirements and considerations, MLMP 57 
respond to polling or addressing (tributary stations) 32 
return on no completion in checklist, specifying 18 
reverse interrupt (RVI) 

and addressing 31 

and transmit/receive interspersed 37, 38 

specifying 12 

supported 6 
RPG II 

and trace 54 

consideration 57 
RVI (see reverse interrupt) 



$SNAP dump main storage ($SNAP) 55 

samples (see examples) 

sense/status bytes, BSCA SIO 1 10 

skip entries in checklist 1 7, 30 

spanned record (see record type, spanned) 

station identification sequence, specifying 15 

statistics, MLMP BSC 50 

status/sense messages, 3270 71 

storage requirements, MLMP 57 

switched ID list 

changing a 21,23 

format 112 

generation of 22 

identifying a 15 
System/3 macro instructions 2, 7 
System/3 translate routine 25, 26 

translate tables 25 
table 

trace 54,110 

translate 24 
techniques for initiating data transfer 

address (control station) 31 

conversational reply 33 

poll (tributary stations) 31 

receive interspersed with transmit 37 

receive only 33 

respond to polling or addressing (tributary stations) 32 

transmit interspersed with receive 38 

transmit only 33 
telecommunications lines supported 5 
terminal statistics logging area 

and $LOGB 21 

and MLTERFIL 50 

defining 14,21 

format 1 09 
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terminals supported 5 
terminating BSC files 

receive files 39 

transmit files 39 
terminating data transfer 39 
text mode 32 
trace 

considerations 55 

description 54 

including 54 

table 54,110 
translate parameter list 113 
translate routines, System/3 25, 26 
translate tables, System/3 25 
translation data 6,9 

(see also $TRAN macro instruction; $TRL macro 
instruction; $TRTB macro instruction) 
transmit 

(see also $PUTB macro instruction) 

file, specifying a 11 

from a conversational file 33 

interspersed with receive 38 

only 33 

with reception of a conversational reply 35 
transparency 6, 12 
tributary, System/3 polling and addressing characters 

ASCII 119 

EBCDIC 119 



variable length record (see record type, variable length) 



wrapped polling list 
and $CANB 29 
and$DTFB 14 
specifying 20 



2972 Banking Terminal System (see MLMP, device- 
dependent considerations) 

3270 Information Display System (see MLMP, device- 
dependent considerations) 

(see also 3270 sample program) 

3270 online test considerations 71 

3270 sample program 87 

3270 status/sense messages 71 

3735 programmable terminal (see MLMP, device- 
dependent considerations) 
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